home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1999-04-12 | 12.5 KB | [TgPj/RBv2] |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| id metadata |
|---|
| key | value |
|---|
| macFileType | [TgPj] |
| macFileCreator | [RBv2] |
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0b 12 00 01 bf 03 80 80 | f8 0f 80 fc 07 80 f8 ff |........|........|
|00000010| 0f bf 83 f0 0f be ff 07 | b4 ff bf 0b 00 41 bf fd |........|.....A..|
|00000020| fb 07 bf fd fb 07 41 41 | 41 41 41 01 04 3f 3f 3f |......AA|AAA..???|
|00000030| 3f 00 00 01 01 01 00 05 | 73 69 6d 6f 6e 80 80 80 |?.......|simon...|
|00000040| 01 80 80 80 01 01 00 00 | 00 00 00 00 00 02 49 43 |........|......IC|
|00000050| 4e 23 80 04 00 01 80 00 | 00 06 60 00 00 18 18 00 |N#......|..`.....|
|00000060| 00 60 06 00 00 48 0a 00 | 00 42 22 00 00 40 8a 00 |.`...H..|.B"..@..|
|00000070| 00 40 22 00 00 40 8a 00 | 00 40 22 00 00 40 8a 00 |.@"..@..|.@"..@..|
|00000080| 00 60 26 00 01 98 99 80 | 06 06 60 60 18 01 80 18 |.`&.....|..``....|
|00000090| 12 02 20 28 10 88 88 88 | 10 22 02 28 30 08 80 8c |.. (....|.".(0...|
|000000a0| 70 22 02 2a 90 08 80 8d | b0 22 02 2b 98 09 80 99 |p".*....|.".+....|
|000000b0| a6 26 62 67 69 98 19 9e | 1a 60 06 78 06 80 01 e0 |.&bgi...|.`.x....|
|000000c0| 01 a0 07 80 00 68 1e 00 | 00 1a 78 00 00 06 e0 00 |.....h..|..x.....|
|000000d0| 00 01 80 00 00 01 80 00 | 00 07 e0 00 00 1f f8 00 |........|........|
|000000e0| 00 7f fe 00 00 7f fe 00 | 00 7f fe 00 00 7f fe 00 |........|........|
|000000f0| 00 7f fe 00 00 7f fe 00 | 00 7f fe 00 00 7f fe 00 |........|........|
|00000100| 00 7f fe 00 01 ff ff 80 | 07 ff ff e0 1f ff ff f8 |........|........|
|00000110| 1f ff ff f8 1f ff ff f8 | 1f ff ff f8 3f ff ff fc |........|....?...|
|00000120| 7f ff ff fe ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000130| ff ff ff ff 7f ff ff fe | 1f ff ff f8 07 ff ff e0 |........|........|
|00000140| 01 ff ff 80 00 7f fe 00 | 00 1f f8 00 00 07 e0 00 |........|........|
|00000150| 00 01 80 00 69 63 6c 38 | 80 10 00 00 00 00 00 00 |....icl8|........|
|00000160| 00 00 00 00 00 00 00 00 | 00 ff ff 00 00 00 00 00 |........|........|
|00000170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000180| 00 00 00 00 00 00 00 ff | ff e1 e1 ff ff 00 00 00 |........|........|
|00000190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001a0| 00 00 00 00 00 ff ff e1 | e1 e1 e1 e1 e1 ff ff 00 |........|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 ff ff e1 e1 e1 | e1 e1 e1 e1 e1 e1 e1 ff |........|........|
|000001d0| ff 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 ff e3 e3 00 e1 | e1 e1 e1 e1 e1 e1 e3 e5 |........|........|
|000001f0| ff 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 00 00 00 ff e3 e3 e3 e3 | 00 e1 e1 e1 e3 e5 e5 e5 |........|........|
|00000210| ff 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000220| 00 00 00 ff e3 e3 e3 e3 | e3 e3 00 e5 e5 e5 e5 e5 |........|........|
|00000230| ff 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000240| 00 00 00 ff e3 e3 e3 e3 | e3 e3 e5 e5 e5 e5 e5 e5 |........|........|
|00000250| ff 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000260| 00 00 00 ff e3 e3 e3 e3 | e3 e3 e3 e5 e5 e5 e5 e5 |........|........|
|00000270| ff 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000280| 00 00 00 ff e3 e3 e3 e3 | e3 e3 e5 e5 e5 e5 e5 e5 |........|........|
|00000290| ff 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002a0| 00 00 00 ff e3 e3 e3 e3 | e3 e3 e3 e5 e5 e5 e5 e5 |........|........|
|000002b0| ff 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002c0| 00 00 00 ff e3 e3 e3 e3 | e3 e3 e5 e5 e5 e5 e5 e5 |........|........|
|000002d0| ff 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002e0| 00 ff ff 2a 2a e3 e3 e3 | e3 e3 e3 e5 e5 e5 e5 0b |...**...|........|
|000002f0| 0b ff ff 00 00 00 00 00 | 00 00 00 00 00 00 00 ff |........|........|
|00000300| ff 2a 2a 2a 2a 2a 2a e3 | e3 e3 e5 e5 e5 0b 0b 0b |.******.|........|
|00000310| 0b 0b 0b ff ff 00 00 00 | 00 00 00 00 00 ff ff 2a |........|.......*|
|00000320| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 54 0b 0b 0b 0b 0b |********|**T.....|
|00000330| 0b 0b 0b 0b 0b ff ff 00 | 00 00 00 00 00 ff 54 54 |........|......TT|
|00000340| 00 2a 2a 2a 2a 2a 2a 2a | 54 7f 11 11 00 0b 0b 0b |.*******|T.......|
|00000350| 0b 0b 0b 0b 11 17 ff 00 | 00 00 00 00 00 ff 54 54 |........|......TT|
|00000360| 54 54 00 2a 2a 2a 54 7f | 7f 7f 7f 11 11 11 00 0b |TT.***T.|........|
|00000370| 0b 0b 11 17 17 17 ff 00 | 00 00 00 00 00 ff 54 54 |........|......TT|
|00000380| 54 54 54 54 00 7f 7f 7f | 7f 7f 11 11 11 11 11 11 |TTTT....|........|
|00000390| 00 17 17 17 17 17 ff 00 | 00 00 00 00 ff ff 54 54 |........|......TT|
|000003a0| 54 54 54 54 7f 7f 7f 7f | 7f 7f 7f 11 11 11 11 11 |TTTT....|........|
|000003b0| 17 17 17 17 17 17 ff ff | 00 00 00 ff 00 ff 54 54 |........|......TT|
|000003c0| 54 54 54 54 54 7f 7f 7f | 7f 7f 11 11 11 11 11 11 |TTTTT...|........|
|000003d0| 11 17 17 17 17 17 ff f9 | ff 00 ff 00 f7 ff 54 54 |........|......TT|
|000003e0| 54 54 54 54 7f 7f 7f 7f | 7f 7f 7f 11 11 11 11 11 |TTTT....|........|
|000003f0| 17 17 17 17 17 17 ff f7 | f9 ff ff f7 f7 ff 54 54 |........|......TT|
|00000400| 54 54 54 54 54 7f 7f 7f | 7f 7f 11 11 11 11 11 11 |TTTTT...|........|
|00000410| 11 17 17 17 17 17 ff f7 | f7 ff ff f7 00 ff ff 54 |........|.......T|
|00000420| 54 54 54 54 7f 7f 7f 7f | 7f ff ff 11 11 11 11 11 |TTTT....|........|
|00000430| 17 17 17 17 17 ff ff f7 | f9 ff ff f7 f7 f7 00 ff |........|........|
|00000440| ff 54 54 54 54 7f 7f ff | ff f9 f9 ff ff 11 11 11 |.TTTT...|........|
|00000450| 11 17 17 ff ff f7 f9 f9 | f9 ff 00 ff ff f7 f7 f7 |........|........|
|00000460| 00 ff ff 54 7f ff ff f9 | f9 f9 f9 f7 f6 ff ff 11 |...T....|........|
|00000470| 17 ff ff f7 f9 f9 f9 ff | ff 00 00 00 00 ff ff f7 |........|........|
|00000480| f7 f7 00 ff ff f9 f9 f9 | f7 f6 f6 f6 f6 f6 f6 ff |........|........|
|00000490| ff f7 f9 f9 f9 ff ff 00 | 00 00 00 00 00 00 00 ff |........|........|
|000004a0| ff f7 f7 f7 00 00 f6 f6 | f6 f6 f6 f6 f6 f6 f7 f7 |........|........|
|000004b0| f9 f9 f9 ff ff 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004c0| 00 ff ff f7 f7 f7 00 00 | f6 f6 f6 f6 f7 f7 f9 f9 |........|........|
|000004d0| f9 ff ff 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004e0| 00 00 00 ff ff f7 f7 f7 | 00 00 f7 f7 f9 f9 f9 ff |........|........|
|000004f0| ff 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000500| 00 00 00 00 00 ff ff f7 | f7 f7 f9 f9 f9 ff ff 00 |........|........|
|00000510| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000520| 00 00 00 00 00 00 00 ff | ff f7 f9 ff ff 00 00 00 |........|........|
|00000530| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000540| 00 00 00 00 00 00 00 00 | 00 ff ff 00 00 00 00 00 |........|........|
|00000550| 00 00 00 00 00 00 00 00 | 00 00 01 04 74 65 78 74 |........|....text|
|00000560| 04 52 2a 63 68 04 54 45 | 58 54 00 00 01 41 04 56 |.R*ch.TE|XT...A.V|
|00000570| 69 65 77 04 4d 61 69 6e | 04 9c 01 b5 01 12 04 4e |iew.Main|.......N|
|00000580| 61 6d 65 04 4d 61 69 6e | 05 46 72 61 6d 65 01 30 |ame.Main|.Frame.0|
|00000590| 0c 48 61 73 42 61 63 6b | 43 6f 6c 6f 72 04 54 72 |.HasBack|Color.Tr|
|000005a0| 75 65 09 42 61 63 6b 43 | 6f 6c 6f 72 05 36 35 34 |ue.BackC|olor.654|
|000005b0| 32 34 08 42 61 63 6b 64 | 72 6f 70 01 30 05 54 69 |24.Backd|rop.0.Ti|
|000005c0| 74 6c 65 05 53 49 4d 4f | 4e 07 56 69 73 69 62 6c |tle.SIMO|N.Visibl|
|000005d0| 65 05 46 61 6c 73 65 08 | 43 6c 6f 73 65 42 6f 78 |e.False.|CloseBox|
|000005e0| 04 54 72 75 65 08 47 72 | 6f 77 49 63 6f 6e 05 46 |.True.Gr|owIcon.F|
|000005f0| 61 6c 73 65 08 5a 6f 6f | 6d 49 63 6f 6e 05 46 61 |alse.Zoo|mIcon.Fa|
|00000600| 6c 73 65 0b 42 61 6c 6c | 6f 6f 6e 48 65 6c 70 0e |lse.Ball|oonHelp.|
|00000610| 63 27 65 73 74 20 75 6e | 20 65 73 73 61 69 09 50 |c'est un| essai.P|
|00000620| 6c 61 63 65 6d 65 6e 74 | 01 32 05 57 69 64 74 68 |lacement|.2.Width|
|00000630| 03 33 32 30 06 48 65 69 | 67 68 74 03 33 34 30 08 |.320.Hei|ght.340.|
|00000640| 4d 69 6e 57 69 64 74 68 | 02 36 34 09 4d 69 6e 48 |MinWidth|.64.MinH|
|00000650| 65 69 67 68 74 02 36 34 | 08 4d 61 78 57 69 64 74 |eight.64|.MaxWidt|
|00000660| 68 05 33 32 30 30 30 09 | 4d 61 78 48 65 69 67 68 |h.32000.|MaxHeigh|
|00000670| 74 05 33 32 30 30 30 07 | 00 04 4d 61 69 6e 84 02 |t.32000.|..Main..|
|00000680| 06 41 70 70 6c 65 74 00 | 06 10 73 69 6d 6f 6e 28 |.Applet.|..simon(|
|00000690| 35 29 20 6f 66 20 6f 76 | 61 6c 00 13 73 65 71 20 |5) of ov|al..seq |
|000006a0| 28 31 39 29 20 6f 66 20 | 69 6e 74 65 67 65 72 00 |(19) of |integer.|
|000006b0| 11 4e 75 6d 73 65 71 20 | 61 73 20 69 6e 74 65 67 |.Numseq |as integ|
|000006c0| 65 72 00 12 43 75 72 72 | 53 65 71 20 61 73 20 69 |er..Curr|Seq as i|
|000006d0| 6e 74 65 67 65 72 00 19 | 50 6c 61 79 49 6e 50 72 |nteger..|PlayInPr|
|000006e0| 6f 67 72 65 73 73 20 61 | 73 20 62 6f 6f 6c 65 61 |ogress a|s boolea|
|000006f0| 6e 00 10 53 63 6f 72 65 | 20 61 73 20 49 6e 74 65 |n..Score| as Inte|
|00000700| 67 65 72 00 09 05 62 6c | 69 6e 6b 09 78 20 61 73 |ger...bl|ink.x as|
|00000710| 20 6f 76 61 6c 00 00 02 | 03 02 03 24 14 53 75 62 | oval...|...$.Sub|
|00000720| 20 62 6c 69 6e 6b 28 78 | 20 61 73 20 6f 76 61 6c | blink(x| as oval|
|00000730| 29 34 2f 2f 20 4d 61 6b | 65 73 20 74 68 65 20 4d |)4// Mak|es the M|
|00000740| 75 73 69 63 20 62 75 74 | 74 6f 6e 20 62 6c 69 6e |usic but|ton blin|
|00000750| 6b 20 77 68 65 6e 20 68 | 69 74 20 62 79 20 74 68 |k when h|it by th|
|00000760| 65 20 75 73 65 72 2c 2f | 2f 20 54 68 65 72 65 20 |e user,/|/ There |
|00000770| 61 72 65 20 70 72 6f 62 | 61 62 6c 79 20 62 65 74 |are prob|ably bet|
|00000780| 74 65 72 20 77 61 79 73 | 20 74 6f 20 64 6f 20 74 |ter ways| to do t|
|00000790| 68 69 73 23 2f 2f 20 42 | 75 74 20 74 68 69 73 20 |his#// B|ut this |
|000007a0| 6f 6e 65 20 69 73 20 4f | 4b 20 66 6f 72 20 74 68 |one is O|K for th|
|000007b0| 69 73 20 67 61 6d 65 00 | 10 64 69 6d 20 74 6d 70 |is game.|.dim tmp|
|000007c0| 20 61 73 20 63 6f 6c 6f | 72 15 64 69 6d 20 68 65 | as colo|r.dim he|
|000007d0| 69 67 68 74 20 61 73 20 | 69 6e 74 65 67 65 72 00 |ight as |integer.|
|000007e0| 2d 2f 2f 20 72 65 63 6f | 72 64 20 63 75 72 72 65 |-// reco|rd curre|
|000007f0| 6e 74 20 62 6f 72 64 65 | 72 63 6f 6c 6f 72 20 6f |nt borde|rcolor o|
|00000800| 66 20 4d 75 73 69 63 20 | 62 75 74 74 6f 6e 13 74 |f Music |button.t|
|00000810| 6d 70 20 3d 20 78 2e 62 | 6f 72 64 65 72 63 6f 6c |mp = x.b|ordercol|
|00000820| 6f 72 00 33 2f 2f 20 73 | 65 6c 65 63 74 20 6e 6f |or.3// s|elect no|
|00000830| 74 65 20 61 63 63 6f 72 | 64 69 6e 67 20 74 6f 20 |te accor|ding to |
|00000840| 74 68 65 20 4d 75 73 69 | 63 20 62 75 74 74 6f 6e |the Musi|c button|
|00000850| 20 6e 75 6d 62 65 72 15 | 68 65 69 67 68 74 20 3d | number.|height =|
|00000860| 20 78 2e 69 6e 64 65 78 | 2a 34 2b 36 30 00 0c 2f | x.index|*4+60../|
|00000870| 2f 20 70 6c 61 79 20 6e | 6f 74 65 18 6e 6f 74 65 |/ play n|ote.note|
|00000880| 2e 70 6c 61 79 4e 6f 74 | 65 20 68 65 69 67 68 74 |.playNot|e height|
|00000890| 2c 31 32 37 00 1e 2f 2f | 20 63 68 61 6e 67 65 20 |,127..//| change |
|000008a0| 62 6f 72 64 65 72 63 6f | 6c 6f 72 20 74 6f 20 77 |borderco|lor to w|
|000008b0| 68 69 74 65 20 78 2e 62 | 6f 72 64 65 72 63 6f 6c |hite x.b|ordercol|
|000008c0| 6f 72 20 3d 20 72 67 62 | 28 32 35 35 2c 32 35 35 |or = rgb|(255,255|
|000008d0| 2c 32 35 35 29 00 30 2f | 2f 20 61 62 73 6f 6c 75 |,255).0/|/ absolu|
|000008e0| 74 65 6c 79 20 72 65 71 | 75 69 72 65 64 20 66 6f |tely req|uired fo|
|000008f0| 72 20 63 6f 72 72 65 63 | 74 20 76 69 73 75 61 6c |r correc|t visual|
|00000900| 20 65 66 66 65 63 74 09 | 78 2e 72 65 66 72 65 73 | effect.|x.refres|
|00000910| 68 00 1a 2f 2f 20 6a 75 | 73 74 20 66 6f 72 20 65 |h..// ju|st for e|
|00000920| 79 65 27 73 20 63 61 74 | 63 68 69 6e 67 06 77 61 |ye's cat|ching.wa|
|00000930| 69 74 20 38 00 19 2f 2f | 20 72 65 73 74 6f 72 65 |it 8..//| restore|
|00000940| 20 70 72 65 76 69 6f 75 | 73 20 63 6f 6c 6f 72 13 | previou|s color.|
|00000950| 78 2e 62 6f 72 64 65 72 | 63 6f 6c 6f 72 20 3d 20 |x.border|color = |
|00000960| 74 6d 70 00 30 2f 2f 20 | 61 62 73 6f 6c 75 74 65 |tmp.0// |absolute|
|00000970| 6c 79 20 72 65 71 75 69 | 72 65 64 20 66 6f 72 20 |ly requi|red for |
|00000980| 63 6f 72 72 65 63 74 20 | 76 69 73 75 61 6c 20 65 |correct |visual e|
|00000990| 66 66 65 63 74 09 78 2e | 72 65 66 72 65 73 68 00 |ffect.x.|refresh.|
|000009a0| 14 2f 2f 20 73 74 6f 70 | 20 70 6c 61 79 69 6e 67 |.// stop| playing|
|000009b0| 20 6e 6f 74 65 16 6e 6f | 74 65 2e 70 6c 61 79 4e | note.no|te.playN|
|000009c0| 6f 74 65 20 68 65 69 67 | 68 74 2c 30 00 07 45 6e |ote heig|ht,0..En|
|000009d0| 64 20 53 75 62 04 69 6e | 69 74 00 00 00 29 1f 29 |d Sub.in|it...).)|
|000009e0| 1f 2d 0a 53 75 62 20 69 | 6e 69 74 28 29 18 2f 2f |.-.Sub i|nit().//|
|000009f0| 20 49 6e 69 74 69 61 6c | 69 73 61 74 69 6f 6e 20 | Initial|isation |
|00000a00| 6d 65 74 68 6f 64 10 64 | 69 6d 20 69 20 61 73 20 |method.d|im i as |
|00000a10| 69 6e 74 65 67 65 72 1a | 2f 2f 63 72 65 61 74 69 |integer.|//creati|
|00000a20| 6f 6e 20 6f 66 20 67 61 | 6d 65 20 62 75 74 74 6f |on of ga|me butto|
|00000a30| 6e 73 0e 66 6f 72 20 69 | 20 3d 20 30 20 74 6f 20 |ns.for i| = 0 to |
|00000a40| 35 14 73 69 6d 6f 6e 28 | 69 29 20 3d 20 6e 65 77 |5.simon(|i) = new|
|00000a50| 20 6f 76 61 6c 31 04 6e | 65 78 74 27 2f 2f 20 42 | oval1.n|ext'// B|
|00000a60| 75 74 74 6f 6e 73 20 61 | 72 65 20 6f 72 67 61 6e |uttons a|re organ|
|00000a70| 69 73 65 64 20 61 73 20 | 61 6e 20 68 65 78 61 67 |ised as |an hexag|
|00000a80| 6f 6e 20 26 2f 2f 20 54 | 68 65 69 72 20 63 6f 6c |on &// T|heir col|
|00000a90| 6f 72 73 20 61 72 65 20 | 74 68 65 20 33 20 70 72 |ors are |the 3 pr|
|00000aa0| 69 6d 61 72 79 20 61 6e | 64 20 18 2f 2f 20 74 68 |imary an|d .// th|
|00000ab0| 65 20 33 20 73 65 63 6f | 6e 64 61 72 79 20 6f 6e |e 3 seco|ndary on|
|00000ac0| 65 73 20 00 14 2f 2f 20 | 46 69 72 73 74 20 6f 6e |es ..// |First on|
|00000ad0| 65 20 69 73 20 62 6c 75 | 65 21 73 69 6d 6f 6e 28 |e is blu|e!simon(|
|00000ae0| 30 29 2e 66 69 6c 6c 63 | 6f 6c 6f 72 20 3d 20 72 |0).fillc|olor = r|
|00000af0| 67 62 28 30 2c 30 2c 32 | 35 35 29 11 73 69 6d 6f |gb(0,0,2|55).simo|
|00000b00| 6e 28 30 29 2e 74 6f 70 | 20 3d 20 33 30 13 73 69 |n(0).top| = 30.si|
|00000b10| 6d 6f 6e 28 30 29 2e 6c | 65 66 74 20 3d 20 31 33 |mon(0).l|eft = 13|
|00000b20| 35 00 18 2f 2f 20 53 65 | 63 6f 6e 64 20 6f 6e 65 |5..// Se|cond one|
|00000b30| 20 69 73 20 4d 61 67 65 | 6e 74 61 23 73 69 6d 6f | is Mage|nta#simo|
|00000b40| 6e 28 31 29 2e 66 69 6c | 6c 63 6f 6c 6f 72 20 3d |n(1).fil|lcolor =|
|00000b50| 20 72 67 62 28 32 35 35 | 2c 30 2c 32 35 35 29 11 | rgb(255|,0,255).|
|00000b60| 73 69 6d 6f 6e 28 31 29 | 2e 74 6f 70 20 3d 20 38 |simon(1)|.top = 8|
|00000b70| 30 13 73 69 6d 6f 6e 28 | 31 29 2e 6c 65 66 74 20 |0.simon(|1).left |
|00000b80| 3d 20 32 32 32 00 13 2f | 2f 20 54 68 69 72 64 20 |= 222../|/ Third |
|00000b90| 6f 6e 65 20 69 73 20 52 | 65 64 21 73 69 6d 6f 6e |one is R|ed!simon|
|00000ba0| 28 32 29 2e 66 69 6c 6c | 63 6f 6c 6f 72 20 3d 20 |(2).fill|color = |
|00000bb0| 72 67 62 28 32 35 35 2c | 30 2c 30 29 12 73 69 6d |rgb(255,|0,0).sim|
|00000bc0| 6f 6e 28 32 29 2e 74 6f | 70 20 3d 20 31 38 30 13 |on(2).to|p = 180.|
|00000bd0| 73 69 6d 6f 6e 28 32 29 | 2e 6c 65 66 74 20 3d 20 |simon(2)|.left = |
|00000be0| 32 32 32 00 17 2f 2f 20 | 46 6f 75 72 74 68 20 6f |222..// |Fourth o|
|00000bf0| 6e 65 20 69 73 20 59 65 | 6c 6c 6f 77 23 73 69 6d |ne is Ye|llow#sim|
|00000c00| 6f 6e 28 33 29 2e 66 69 | 6c 6c 63 6f 6c 6f 72 20 |on(3).fi|llcolor |
|00000c10| 3d 20 72 67 62 28 32 35 | 35 2c 32 35 35 2c 30 29 |= rgb(25|5,255,0)|
|00000c20| 12 73 69 6d 6f 6e 28 33 | 29 2e 74 6f 70 20 3d 20 |.simon(3|).top = |
|00000c30| 32 33 30 13 73 69 6d 6f | 6e 28 33 29 2e 6c 65 66 |230.simo|n(3).lef|
|00000c40| 74 20 3d 20 31 33 35 00 | 15 2f 2f 20 46 69 66 74 |t = 135.|.// Fift|
|00000c50| 68 20 6f 6e 65 20 69 73 | 20 47 72 65 65 6e 21 73 |h one is| Green!s|
|00000c60| 69 6d 6f 6e 28 34 29 2e | 66 69 6c 6c 63 6f 6c 6f |imon(4).|fillcolo|
|00000c70| 72 20 3d 20 72 67 62 28 | 30 2c 32 35 35 2c 30 29 |r = rgb(|0,255,0)|
|00000c80| 12 73 69 6d 6f 6e 28 34 | 29 2e 74 6f 70 20 3d 20 |.simon(4|).top = |
|00000c90| 31 38 30 12 73 69 6d 6f | 6e 28 34 29 2e 6c 65 66 |180.simo|n(4).lef|
|00000ca0| 74 20 3d 20 34 38 00 14 | 2f 2f 20 53 69 78 74 68 |t = 48..|// Sixth|
|00000cb0| 20 6f 6e 65 20 69 73 20 | 43 79 61 6e 23 73 69 6d | one is |Cyan#sim|
|00000cc0| 6f 6e 28 35 29 2e 66 69 | 6c 6c 63 6f 6c 6f 72 20 |on(5).fi|llcolor |
|00000cd0| 3d 20 72 67 62 28 30 2c | 32 35 35 2c 32 35 35 29 |= rgb(0,|255,255)|
|00000ce0| 11 73 69 6d 6f 6e 28 35 | 29 2e 74 6f 70 20 3d 20 |.simon(5|).top = |
|00000cf0| 38 30 12 73 69 6d 6f 6e | 28 35 29 2e 6c 65 66 74 |80.simon|(5).left|
|00000d00| 20 3d 20 34 38 00 1f 2f | 2f 20 4d 61 78 20 6c 65 | = 48../|/ Max le|
|00000d10| 6e 67 74 68 20 6f 66 20 | 6d 75 73 69 63 20 73 65 |ngth of |music se|
|00000d20| 71 75 65 6e 63 65 0a 6e | 75 6d 73 65 71 20 3d 20 |quence.n|umseq = |
|00000d30| 30 16 50 6c 61 79 49 6e | 50 72 6f 67 72 65 73 73 |0.PlayIn|Progress|
|00000d40| 20 3d 20 66 61 6c 73 65 | 07 45 6e 64 20 53 75 62 | = false|.End Sub|
|00000d50| 05 53 74 61 72 74 00 00 | 00 11 03 11 03 14 0b 53 |.Start..|.......S|
|00000d60| 75 62 20 53 74 61 72 74 | 28 29 30 2f 2f 20 4d 65 |ub Start|()0// Me|
|00000d70| 74 68 6f 64 20 61 63 74 | 69 76 61 74 65 64 20 62 |thod act|ivated b|
|00000d80| 79 20 64 65 70 72 65 73 | 73 69 6e 67 20 4e 65 77 |y depres|sing New|
|00000d90| 50 6c 61 79 20 42 75 74 | 74 6f 6e 10 64 69 6d 20 |Play But|ton.dim |
|00000da0| 69 20 61 73 20 69 6e 74 | 65 67 65 72 2e 2f 2f 20 |i as int|eger.// |
|00000db0| 49 6e 69 74 69 61 6c 69 | 73 61 74 69 6f 6e 20 6f |Initiali|sation o|
|00000dc0| 66 20 61 20 72 61 6e 64 | 6f 6d 20 6d 75 73 69 63 |f a rand|om music|
|00000dd0| 61 6c 20 73 65 71 75 65 | 6e 63 65 2e 2f 2f 20 32 |al seque|nce.// 2|
|00000de0| 30 20 6e 6f 74 65 73 20 | 69 6e 20 73 65 71 75 65 |0 notes |in seque|
|00000df0| 6e 63 65 20 69 73 20 61 | 6c 72 65 61 64 79 20 70 |nce is a|lready p|
|00000e00| 72 65 74 74 79 20 68 61 | 72 64 22 2f 2f 20 74 6f |retty ha|rd"// to|
|00000e10| 20 72 65 6d 65 6d 62 65 | 72 20 28 61 74 20 6c 65 | remembe|r (at le|
|00000e20| 61 73 74 20 66 6f 72 20 | 6d 65 20 21 29 10 66 6f |ast for |me !).fo|
|00000e30| 72 20 69 20 3d 20 30 20 | 74 6f 20 31 39 20 17 73 |r i = 0 |to 19 .s|
|00000e40| 65 71 28 69 29 20 3d 20 | 66 6c 6f 6f 72 28 72 6e |eq(i) = |floor(rn|
|00000e50| 64 20 2a 20 36 29 04 6e | 65 78 74 19 2f 2f 20 41 |d * 6).n|ext.// A|
|00000e60| 20 6e 65 77 20 67 61 6d | 65 20 68 61 73 20 73 74 | new gam|e has st|
|00000e70| 61 72 74 65 64 14 50 6c | 61 79 49 6e 50 72 6f 67 |arted.Pl|ayInProg|
|00000e80| 72 65 73 73 20 3d 74 72 | 75 65 11 2f 2f 20 4e 6f |ress =tr|ue.// No|
|00000e90| 20 73 75 63 63 65 73 73 | 20 79 65 74 09 53 63 6f | success| yet.Sco|
|00000ea0| 72 65 20 3d 20 30 0e 55 | 70 64 53 63 6f 72 65 20 |re = 0.U|pdScore |
|00000eb0| 53 63 6f 72 65 14 2f 2f | 20 53 74 61 72 74 20 6f |Score.//| Start o|
|00000ec0| 66 20 53 65 71 75 65 6e | 63 65 0a 4e 75 6d 73 65 |f Sequen|ce.Numse|
|00000ed0| 71 20 3d 20 30 0b 43 75 | 72 72 53 65 71 20 3d 20 |q = 0.Cu|rrSeq = |
|00000ee0| 30 12 2f 2f 20 50 6c 61 | 79 20 46 69 72 73 74 20 |0.// Pla|y First |
|00000ef0| 6e 6f 74 65 09 50 6c 61 | 79 53 65 71 20 30 07 45 |note.Pla|ySeq 0.E|
|00000f00| 6e 64 20 53 75 62 04 77 | 61 69 74 0c 78 20 61 73 |nd Sub.w|ait.x as|
|00000f10| 20 69 6e 74 65 67 65 72 | 00 00 08 1a 08 1a 0a 16 | integer|........|
|00000f20| 53 75 62 20 77 61 69 74 | 28 78 20 61 73 20 69 6e |Sub wait|(x as in|
|00000f30| 74 65 67 65 72 29 2a 2f | 2f 20 4a 75 73 74 20 6d |teger)*/|/ Just m|
|00000f40| 79 20 6f 77 6e 20 69 6d | 70 6c 65 6d 65 6e 74 61 |y own im|plementa|
|00000f50| 74 69 6f 6e 20 6f 66 20 | 48 79 70 65 72 43 61 72 |tion of |HyperCar|
|00000f60| 64 11 2f 2f 20 77 61 69 | 74 20 6e 20 78 20 74 69 |d.// wai|t n x ti|
|00000f70| 63 6b 73 26 2f 2f 20 44 | 69 64 6e 27 74 20 66 69 |cks&// D|idn't fi|
|00000f80| 6e 64 20 69 74 20 69 6e | 20 74 68 65 20 64 6f 63 |nd it in| the doc|
|00000f90| 75 6d 65 6e 74 61 74 69 | 6f 6e 00 10 64 69 6d 20 |umentati|on..dim |
|00000fa0| 74 20 61 73 20 69 6e 74 | 65 67 65 72 09 74 20 3d |t as int|eger.t =|
|00000fb0| 20 74 69 63 6b 73 02 64 | 6f 1a 6c 6f 6f 70 20 75 | ticks.d|o.loop u|
|00000fc0| 6e 74 69 6c 20 28 28 74 | 69 63 6b 73 2d 74 29 20 |ntil ((t|icks-t) |
|00000fd0| 3e 20 78 29 07 45 6e 64 | 20 53 75 62 07 50 6c 61 |> x).End| Sub.Pla|
|00000fe0| 79 53 65 71 0e 6e 75 6d | 20 61 73 20 69 6e 74 65 |ySeq.num| as inte|
|00000ff0| 67 65 72 00 00 02 10 02 | 10 09 1b 53 75 62 20 50 |ger.....|...Sub P|
|00001000| 6c 61 79 53 65 71 28 6e | 75 6d 20 61 73 20 69 6e |laySeq(n|um as in|
|00001010| 74 65 67 65 72 29 23 2f | 2f 20 50 6c 61 79 73 20 |teger)#/|/ Plays |
|00001020| 61 20 77 68 6f 6c 65 20 | 73 65 71 75 65 6e 63 65 |a whole |sequence|
|00001030| 20 6f 66 20 6e 6f 74 65 | 73 20 1e 2f 2f 20 77 68 | of note|s .// wh|
|00001040| 69 6c 65 20 73 68 6f 77 | 69 6e 67 20 62 75 74 74 |ile show|ing butt|
|00001050| 6f 6e 73 20 62 6c 69 6e | 6b 10 64 69 6d 20 69 20 |ons blin|k.dim i |
|00001060| 61 73 20 69 6e 74 65 67 | 65 72 11 66 6f 72 20 69 |as integ|er.for i|
|00001070| 20 3d 20 30 20 74 6f 20 | 6e 75 6d 20 13 62 6c 69 | = 0 to |num .bli|
|00001080| 6e 6b 20 73 69 6d 6f 6e | 28 73 65 71 28 69 29 29 |nk simon|(seq(i))|
|00001090| 07 77 61 69 74 20 32 30 | 04 6e 65 78 74 07 45 6e |.wait 20|.next.En|
|000010a0| 64 20 53 75 62 05 63 68 | 65 63 6b 0e 62 74 6e 20 |d Sub.ch|eck.btn |
|000010b0| 61 73 20 69 6e 74 65 67 | 65 72 07 42 6f 6f 6c 65 |as integ|er.Boole|
|000010c0| 61 6e 00 04 00 04 00 06 | 29 46 75 6e 63 74 69 6f |an......|)Functio|
|000010d0| 6e 20 63 68 65 63 6b 28 | 62 74 6e 20 61 73 20 69 |n check(|btn as i|
|000010e0| 6e 74 65 67 65 72 29 20 | 41 73 20 42 6f 6f 6c 65 |nteger) |As Boole|
|000010f0| 61 6e 2d 2f 2f 20 43 68 | 65 63 6b 73 20 69 66 20 |an-// Ch|ecks if |
|00001100| 74 68 65 20 62 75 74 74 | 6f 6e 20 68 69 74 20 69 |the butt|on hit i|
|00001110| 73 20 74 68 65 20 72 69 | 67 68 74 20 6f 6e 65 20 |s the ri|ght one |
|00001120| 12 2f 2f 20 69 6e 20 74 | 68 65 20 73 65 71 75 65 |.// in t|he seque|
|00001130| 6e 63 65 1b 72 65 74 75 | 72 6e 20 28 62 74 6e 20 |nce.retu|rn (btn |
|00001140| 3d 20 73 65 71 28 43 75 | 72 72 53 65 71 29 29 00 |= seq(Cu|rrSeq)).|
|00001150| 0c 45 6e 64 20 46 75 6e | 63 74 69 6f 6e 04 67 6f |.End Fun|ction.go|
|00001160| 6f 64 00 00 00 15 09 15 | 09 2d 0a 53 75 62 20 67 |od......|.-.Sub g|
|00001170| 6f 6f 64 28 29 1e 2f 2f | 20 42 75 74 74 6f 6e 20 |ood().//| Button |
|00001180| 68 69 74 20 69 73 20 74 | 68 65 20 72 69 67 68 74 |hit is t|he right|
|00001190| 20 6f 6e 65 00 1a 69 66 | 20 43 75 72 72 53 65 71 | one..if| CurrSeq|
|000011a0| 20 3e 3d 20 6e 75 6d 73 | 65 71 20 74 68 65 6e 20 | >= nums|eq then |
|000011b0| 2d 2f 2f 20 57 65 20 68 | 61 76 65 20 63 6f 6d 70 |-// We h|ave comp|
|000011c0| 6c 65 74 65 64 20 74 68 | 65 20 72 69 67 68 74 20 |leted th|e right |
|000011d0| 6d 75 73 69 63 20 73 65 | 71 75 65 6e 63 65 00 1d |music se|quence..|
|000011e0| 6f 75 61 69 73 2e 70 6c | 61 79 20 2f 2f 20 46 72 |ouais.pl|ay // Fr|
|000011f0| 65 6e 63 68 20 79 65 61 | 68 20 3a 5e 29 00 27 2f |ench yea|h :^).'/|
|00001200| 2f 20 44 69 64 6e 27 74 | 20 66 69 6e 64 20 73 6f |/ Didn't| find so|
|00001210| 6d 65 74 68 69 6e 67 20 | 6c 69 6b 65 20 48 79 70 |mething |like Hyp|
|00001220| 65 72 63 61 72 64 20 2f | 2f 20 77 61 69 74 20 75 |ercard /|/ wait u|
|00001230| 6e 74 69 6c 20 74 68 65 | 20 73 6f 75 6e 64 20 69 |ntil the| sound i|
|00001240| 73 20 64 6f 6e 65 20 09 | 77 61 69 74 20 31 30 30 |s done .|wait 100|
|00001250| 20 00 11 2f 2f 20 69 6e | 63 72 65 61 73 65 20 73 | ..// in|crease s|
|00001260| 63 6f 72 65 12 73 63 6f | 72 65 20 3d 20 43 75 72 |core.sco|re = Cur|
|00001270| 72 53 65 71 20 2b 31 00 | 0f 2f 2f 20 55 70 64 61 |rSeq +1.|.// Upda|
|00001280| 74 65 20 73 63 6f 72 65 | 0e 55 70 64 53 63 6f 72 |te score|.UpdScor|
|00001290| 65 20 73 63 6f 72 65 00 | 1b 2f 2f 20 69 6e 63 72 |e score.|.// incr|
|000012a0| 65 61 73 65 20 73 65 71 | 75 65 6e 63 65 20 6e 75 |ease seq|uence nu|
|000012b0| 6d 62 65 72 11 6e 75 6d | 73 65 71 20 3d 20 6e 75 |mber.num|seq = nu|
|000012c0| 6d 73 65 71 2b 31 00 2d | 2f 2f 20 52 65 73 65 74 |mseq+1.-|// Reset|
|000012d0| 73 20 63 75 72 72 65 6e | 74 20 69 6e 64 65 78 20 |s curren|t index |
|000012e0| 66 6f 72 20 74 68 65 20 | 6e 65 78 74 20 73 65 71 |for the |next seq|
|000012f0| 75 65 6e 63 65 0b 43 75 | 72 72 53 65 71 20 3d 20 |uence.Cu|rrSeq = |
|00001300| 30 00 24 2f 2f 20 48 61 | 76 65 20 77 65 20 72 65 |0.$// Ha|ve we re|
|00001310| 61 63 68 20 74 68 65 20 | 6d 61 78 69 6d 75 6d 20 |ach the |maximum |
|00001320| 73 63 6f 72 65 20 3f 14 | 69 66 20 6e 75 6d 73 65 |score ?.|if numse|
|00001330| 71 20 3d 20 32 30 20 74 | 68 65 6e 20 00 16 2f 2f |q = 20 t|hen ..//|
|00001340| 20 50 6c 61 79 20 61 6e | 6f 74 68 65 72 20 73 6f | Play an|other so|
|00001350| 75 6e 64 20 25 2f 2f 20 | 4e 42 20 3a 20 49 20 62 |und %// |NB : I b|
|00001360| 6f 72 72 6f 77 65 64 20 | 74 68 69 73 20 6f 6e 65 |orrowed |this one|
|00001370| 20 74 6f 20 43 69 76 20 | 49 49 08 66 69 6e 2e 50 | to Civ |II.fin.P|
|00001380| 6c 61 79 00 0f 2f 2f 20 | 47 61 6d 65 20 69 73 20 |lay..// |Game is |
|00001390| 6f 76 65 72 16 50 6c 61 | 79 49 6e 50 72 6f 67 72 |over.Pla|yInProgr|
|000013a0| 65 73 73 20 3d 20 66 61 | 6c 73 65 0a 6e 75 6d 73 |ess = fa|lse.nums|
|000013b0| 65 71 20 3d 20 30 00 04 | 65 6c 73 65 1f 2f 2f 20 |eq = 0..|else.// |
|000013c0| 50 6c 61 79 20 74 68 65 | 20 6e 65 78 74 20 6d 75 |Play the| next mu|
|000013d0| 73 69 63 20 73 65 71 75 | 65 6e 63 65 0e 50 6c 61 |sic sequ|ence.Pla|
|000013e0| 79 53 65 71 20 6e 75 6d | 73 65 71 06 65 6e 64 20 |ySeq num|seq.end |
|000013f0| 69 66 00 06 65 6c 73 65 | 20 20 25 2f 2f 20 57 65 |if..else| %// We|
|00001400| 20 61 72 65 20 69 6e 20 | 74 68 65 20 6d 69 64 64 | are in |the midd|
|00001410| 6c 65 20 6f 66 20 61 20 | 73 65 71 75 65 6e 63 65 |le of a |sequence|
|00001420| 13 43 75 72 72 53 65 71 | 20 3d 20 43 75 72 72 53 |.CurrSeq| = CurrS|
|00001430| 65 71 2b 31 06 65 6e 64 | 20 69 66 07 45 6e 64 20 |eq+1.end| if.End |
|00001440| 53 75 62 03 62 61 64 00 | 00 00 06 00 06 00 08 09 |Sub.bad.|........|
|00001450| 53 75 62 20 62 61 64 28 | 29 0f 2f 2f 20 59 6f 75 |Sub bad(|).// You|
|00001460| 20 6c 6f 6f 73 65 20 21 | 21 09 69 61 72 6b 2e 70 | loose !|!.iark.p|
|00001470| 6c 61 79 00 0f 2f 2f 20 | 47 61 6d 65 20 69 73 20 |lay..// |Game is |
|00001480| 6f 76 65 72 16 50 6c 61 | 79 49 6e 50 72 6f 67 72 |over.Pla|yInProgr|
|00001490| 65 73 73 20 3d 20 66 61 | 6c 73 65 00 07 45 6e 64 |ess = fa|lse..End|
|000014a0| 20 53 75 62 08 55 70 64 | 53 63 6f 72 65 0c 6e 20 | Sub.Upd|Score.n |
|000014b0| 61 73 20 69 6e 74 65 67 | 65 72 00 00 09 12 09 12 |as integ|er......|
|000014c0| 0b 1a 53 75 62 20 55 70 | 64 53 63 6f 72 65 28 6e |..Sub Up|dScore(n|
|000014d0| 20 61 73 20 69 6e 74 65 | 67 65 72 29 29 2f 2f 20 | as inte|ger))// |
|000014e0| 55 70 64 61 74 65 20 6f | 66 20 63 75 72 72 65 6e |Update o|f curren|
|000014f0| 74 20 73 63 6f 72 65 20 | 69 6e 20 6d 61 69 6e 20 |t score |in main |
|00001500| 77 69 6e 64 6f 77 2a 2f | 2f 20 42 6f 74 68 2c 20 |window*/|/ Both, |
|00001510| 69 6e 20 61 6e 20 45 64 | 69 74 46 69 65 6c 64 20 |in an Ed|itField |
|00001520| 69 6e 20 74 68 65 20 63 | 65 6e 74 65 72 20 6f 66 |in the c|enter of|
|00001530| 20 0d 2f 2f 20 74 68 65 | 20 77 69 6e 64 6f 77 16 | .// the| window.|
|00001540| 61 66 66 73 63 6f 72 65 | 2e 74 65 78 74 20 3d 20 |affscore|.text = |
|00001550| 73 74 72 28 6e 29 00 2e | 2f 2f 20 41 6e 64 20 69 |str(n)..|// And i|
|00001560| 6e 20 61 20 73 63 72 6f | 6c 6c 62 61 72 20 6a 75 |n a scro|llbar ju|
|00001570| 73 74 20 62 65 6c 6f 77 | 20 74 68 65 20 45 64 69 |st below| the Edi|
|00001580| 74 46 69 65 6c 64 2a 2f | 2f 20 51 75 69 74 65 20 |tField*/|/ Quite |
|00001590| 75 6e 75 73 65 66 75 6c | 20 62 75 74 20 49 20 6a |unuseful| but I j|
|000015a0| 75 73 74 20 74 72 69 65 | 64 20 69 74 20 61 6e 64 |ust trie|d it and|
|000015b0| 20 2d 2f 2f 20 69 74 20 | 77 6f 72 6b 65 64 20 66 | -// it |worked f|
|000015c0| 72 6f 6d 20 74 68 65 20 | 66 69 72 73 74 20 74 69 |rom the |first ti|
|000015d0| 6d 65 2e 20 43 6f 6f 6f | 6c 20 21 20 3a 5e 29 12 |me. Cooo|l ! :^).|
|000015e0| 73 63 6f 72 65 62 61 72 | 2e 76 61 6c 75 65 20 3d |scorebar|.value =|
|000015f0| 20 6e 07 45 6e 64 20 53 | 75 62 00 08 07 4b 65 79 | n.End S|ub...Key|
|00001600| 44 6f 77 6e 01 00 01 00 | 03 2a 46 75 6e 63 74 69 |Down....|.*Functi|
|00001610| 6f 6e 20 4b 65 79 44 6f | 77 6e 28 4b 65 79 20 41 |on KeyDo|wn(Key A|
|00001620| 73 20 53 74 72 69 6e 67 | 29 20 41 73 20 42 6f 6f |s String|) As Boo|
|00001630| 6c 65 61 6e 00 0c 45 6e | 64 20 46 75 6e 63 74 69 |lean..En|d Functi|
|00001640| 6f 6e 0a 44 72 6f 70 4f | 62 6a 65 63 74 01 00 01 |on.DropO|bject...|
|00001650| 00 03 1f 53 75 62 20 44 | 72 6f 70 4f 62 6a 65 63 |...Sub D|ropObjec|
|00001660| 74 28 6f 62 6a 20 41 73 | 20 44 72 61 67 49 74 65 |t(obj As| DragIte|
|00001670| 6d 29 00 07 45 6e 64 20 | 53 75 62 09 4d 6f 75 73 |m)..End |Sub.Mous|
|00001680| 65 44 6f 77 6e 37 00 37 | 00 39 39 46 75 6e 63 74 |eDown7.7|.99Funct|
|00001690| 69 6f 6e 20 4d 6f 75 73 | 65 44 6f 77 6e 28 58 20 |ion Mous|eDown(X |
|000016a0| 41 73 20 49 6e 74 65 67 | 65 72 2c 20 59 20 41 73 |As Integ|er, Y As|
|000016b0| 20 49 6e 74 65 67 65 72 | 29 20 41 73 20 42 6f 6f | Integer|) As Boo|
|000016c0| 6c 65 61 6e 33 2f 2f 20 | 4d 61 69 6e 20 65 76 65 |lean3// |Main eve|
|000016d0| 6e 74 20 74 6f 20 62 65 | 20 74 72 61 63 6b 65 64 |nt to be| tracked|
|000016e0| 20 64 6f 77 6e 20 69 6e | 20 74 68 65 20 6d 61 69 | down in| the mai|
|000016f0| 6e 20 77 69 6e 64 6f 77 | 34 2f 2f 20 44 65 74 65 |n window|4// Dete|
|00001700| 63 74 73 20 6d 75 73 69 | 63 20 62 75 74 74 6f 6e |cts musi|c button|
|00001710| 73 20 68 69 74 73 20 61 | 6e 64 20 72 65 61 63 74 |s hits a|nd react|
|00001720| 73 20 61 63 63 6f 72 64 | 69 6e 67 6c 79 00 18 64 |s accord|ingly..d|
|00001730| 69 6d 20 69 2c 20 42 75 | 74 74 6f 6e 20 61 73 20 |im i, Bu|tton as |
|00001740| 69 6e 74 65 67 65 72 11 | 64 69 6d 20 6f 6b 20 61 |integer.|dim ok a|
|00001750| 73 20 62 6f 6f 6c 65 61 | 6e 00 13 2f 2f 20 74 65 |s boolea|n..// te|
|00001760| 6d 70 6f 72 61 72 79 20 | 6f 62 6a 65 63 74 0e 64 |mporary |object.d|
|00001770| 69 6d 20 74 67 20 61 73 | 20 6f 76 61 6c 00 23 2f |im tg as| oval.#/|
|00001780| 2f 20 42 75 74 74 6f 6e | 20 69 73 20 69 6e 69 74 |/ Button| is init|
|00001790| 69 61 6c 69 73 65 64 20 | 74 6f 20 6e 6f 74 68 69 |ialised |to nothi|
|000017a0| 6e 67 0c 42 75 74 74 6f | 6e 20 3d 20 2d 31 20 00 |ng.Butto|n = -1 .|
|000017b0| 16 69 66 20 50 6c 61 79 | 49 6e 50 72 6f 67 72 65 |.if Play|InProgre|
|000017c0| 73 73 20 74 68 65 6e 2b | 2f 2f 20 77 65 20 63 68 |ss then+|// we ch|
|000017d0| 65 63 6b 20 69 66 20 74 | 68 65 20 6d 6f 75 73 65 |eck if t|he mouse|
|000017e0| 20 6c 6f 63 61 74 69 6f | 6e 20 69 73 20 77 69 74 | locatio|n is wit|
|000017f0| 68 69 6e 1e 2f 2f 20 65 | 61 63 68 20 6d 75 73 69 |hin.// e|ach musi|
|00001800| 63 20 62 75 74 74 6f 6e | 20 72 65 63 74 61 6e 67 |c button| rectang|
|00001810| 6c 65 0e 66 6f 72 20 69 | 20 3d 20 30 20 74 6f 20 |le.for i| = 0 to |
|00001820| 35 0d 74 67 20 3d 20 73 | 69 6d 6f 6e 28 69 29 31 |5.tg = s|imon(i)1|
|00001830| 6f 6b 20 3d 20 28 58 20 | 3e 20 74 67 2e 6c 65 66 |ok = (X |> tg.lef|
|00001840| 74 29 20 61 6e 64 20 28 | 58 20 3c 20 28 74 67 2e |t) and (|X < (tg.|
|00001850| 6c 65 66 74 20 2b 20 74 | 67 2e 77 69 64 74 68 29 |left + t|g.width)|
|00001860| 29 37 6f 6b 20 3d 20 6f | 6b 20 61 6e 64 20 28 59 |)7ok = o|k and (Y|
|00001870| 20 3e 20 74 67 2e 74 6f | 70 29 20 61 6e 64 20 28 | > tg.to|p) and (|
|00001880| 79 20 3c 20 28 74 67 2e | 74 6f 70 20 2b 20 74 67 |y < (tg.|top + tg|
|00001890| 2e 68 65 69 67 68 74 29 | 29 00 0b 69 66 20 6f 6b |.height)|)..if ok|
|000018a0| 20 74 68 65 6e 20 23 2f | 2f 20 57 65 20 68 69 74 | then #/|/ We hit|
|000018b0| 20 61 20 4d 75 73 69 63 | 20 42 75 74 74 6f 6e 20 | a Music| Button |
|000018c0| 73 6f 20 77 65 20 67 69 | 76 65 18 2f 2f 20 66 65 |so we gi|ve.// fe|
|000018d0| 65 64 62 61 63 6b 20 74 | 6f 20 74 68 65 20 75 73 |edback t|o the us|
|000018e0| 65 72 20 08 62 6c 69 6e | 6b 20 74 67 00 1f 2f 2f |er .blin|k tg..//|
|000018f0| 20 61 6e 64 20 72 65 63 | 6f 72 64 20 74 68 65 20 | and rec|ord the |
|00001900| 62 75 74 74 6f 6e 20 6e | 75 6d 62 65 72 0a 42 75 |button n|umber.Bu|
|00001910| 74 74 6f 6e 20 3d 20 69 | 00 06 65 6e 64 20 69 66 |tton = i|..end if|
|00001920| 04 6e 65 78 74 29 2f 2f | 20 41 74 20 74 68 65 20 |.next)//| At the |
|00001930| 65 6e 64 20 6f 66 74 68 | 69 73 20 6c 6f 6f 70 20 |end ofth|is loop |
|00001940| 77 65 20 73 68 6f 75 6c | 64 20 68 61 76 65 20 25 |we shoul|d have %|
|00001950| 2f 2f 20 65 69 74 68 65 | 72 20 6f 6e 65 20 6d 75 |// eithe|r one mu|
|00001960| 73 69 63 20 62 75 74 74 | 6f 6e 20 28 20 30 20 74 |sic butt|on ( 0 t|
|00001970| 6f 20 35 29 20 14 2f 2f | 20 6f 72 20 6e 6f 20 62 |o 5) .//| or no b|
|00001980| 75 74 74 6f 6e 20 28 2d | 31 29 15 69 66 20 42 75 |utton (-|1).if Bu|
|00001990| 74 74 6f 6e 20 3c 3e 20 | 2d 31 20 74 68 65 6e 20 |tton <> |-1 then |
|000019a0| 20 2f 2f 20 4f 6e 65 20 | 6d 75 73 69 63 20 62 75 | // One |music bu|
|000019b0| 74 74 6f 6e 20 68 61 73 | 20 62 65 65 6e 20 68 69 |tton has| been hi|
|000019c0| 74 18 2f 2f 20 49 73 20 | 69 74 20 74 68 65 20 72 |t.// Is |it the r|
|000019d0| 69 67 68 74 20 6f 6e 65 | 20 3f 16 69 66 20 63 68 |ight one| ?.if ch|
|000019e0| 65 63 6b 28 42 75 74 74 | 6f 6e 29 20 74 68 65 6e |eck(Butt|on) then|
|000019f0| 20 00 0f 2f 2f 20 59 65 | 61 68 20 67 6f 74 20 69 | ..// Ye|ah got i|
|00001a00| 74 21 04 67 6f 6f 64 00 | 04 65 6c 73 65 0b 2f 2f |t!.good.|.else.//|
|00001a10| 20 52 61 74 73 20 21 21 | 20 03 62 61 64 00 06 65 | Rats !!| .bad..e|
|00001a20| 6e 64 20 69 66 2c 2f 2f | 20 4f 6f 70 73 20 21 21 |nd if,//| Oops !!|
|00001a30| 20 63 6c 69 63 6b 65 64 | 20 6f 75 74 73 69 64 65 | clicked| outside|
|00001a40| 20 61 6c 6c 20 4d 75 73 | 69 63 20 42 75 74 74 6f | all Mus|ic Butto|
|00001a50| 6e 73 07 65 6e 64 20 69 | 66 20 00 05 65 6c 73 65 |ns.end i|f ..else|
|00001a60| 20 29 2f 2f 20 4e 6f 20 | 67 61 6d 65 20 69 73 20 | )// No |game is |
|00001a70| 69 6e 20 70 72 6f 67 72 | 65 73 73 20 73 6f 20 77 |in progr|ess so w|
|00001a80| 65 20 6a 75 73 74 20 62 | 65 65 70 04 62 65 65 70 |e just b|eep.beep|
|00001a90| 00 06 65 6e 64 20 69 66 | 00 0c 45 6e 64 20 46 75 |..end if|..End Fu|
|00001aa0| 6e 63 74 69 6f 6e 05 50 | 61 69 6e 74 01 00 01 00 |nction.P|aint....|
|00001ab0| 03 18 53 75 62 20 50 61 | 69 6e 74 28 67 20 41 73 |..Sub Pa|int(g As|
|00001ac0| 20 47 72 61 70 68 69 63 | 73 29 00 07 45 6e 64 20 | Graphic|s)..End |
|00001ad0| 53 75 62 05 43 6c 6f 73 | 65 04 00 04 00 06 0b 53 |Sub.Clos|e......S|
|00001ae0| 75 62 20 43 6c 6f 73 65 | 28 29 28 2f 2f 20 54 68 |ub Close|()(// Th|
|00001af0| 69 73 20 61 70 70 6c 69 | 63 61 74 69 6f 6e 20 68 |is appli|cation h|
|00001b00| 61 73 20 6e 6f 20 6d 75 | 6c 74 69 64 6f 63 75 6d |as no mu|ltidocum|
|00001b10| 65 6e 74 24 2f 2f 20 63 | 61 70 61 62 69 6c 69 74 |ent$// c|apabilit|
|00001b20| 79 2c 20 73 6f 20 49 20 | 71 75 69 74 20 75 70 6f |y, so I |quit upo|
|00001b30| 6e 20 63 6c 6f 73 65 20 | 04 71 75 69 74 00 07 45 |n close |.quit..E|
|00001b40| 6e 64 20 53 75 62 0f 45 | 6e 61 62 6c 65 4d 65 6e |nd Sub.E|nableMen|
|00001b50| 75 49 74 65 6d 73 01 0a | 01 0a 04 15 53 75 62 20 |uItems..|....Sub |
|00001b60| 45 6e 61 62 6c 65 4d 65 | 6e 75 49 74 65 6d 73 28 |EnableMe|nuItems(|
|00001b70| 29 19 41 70 70 6c 65 41 | 62 6f 75 74 2e 65 6e 61 |).AppleA|bout.ena|
|00001b80| 62 6c 65 64 20 3d 20 74 | 72 75 65 16 46 69 6c 65 |bled = t|rue.File|
|00001b90| 51 75 69 74 2e 65 6e 61 | 62 6c 65 64 20 3d 74 72 |Quit.ena|bled =tr|
|00001ba0| 75 65 07 45 6e 64 20 53 | 75 62 0a 4d 6f 75 73 65 |ue.End S|ub.Mouse|
|00001bb0| 45 6e 74 65 72 01 00 01 | 00 03 10 53 75 62 20 4d |Enter...|...Sub M|
|00001bc0| 6f 75 73 65 45 6e 74 65 | 72 28 29 00 07 45 6e 64 |ouseEnte|r()..End|
|00001bd0| 20 53 75 62 04 4f 70 65 | 6e 03 00 03 00 07 0a 53 | Sub.Ope|n......S|
|00001be0| 75 62 20 4f 70 65 6e 28 | 29 31 2f 2f 20 4d 61 69 |ub Open(|)1// Mai|
|00001bf0| 6e 20 57 69 6e 64 6f 77 | 20 69 73 20 6e 6f 74 20 |n Window| is not |
|00001c00| 73 68 6f 77 6e 20 64 75 | 72 69 6e 67 20 69 6e 69 |shown du|ring ini|
|00001c10| 74 69 61 6c 69 73 61 74 | 69 6f 6e 09 6d 61 69 6e |tialisat|ion.main|
|00001c20| 2e 68 69 64 65 00 04 69 | 6e 69 74 09 6d 61 69 6e |.hide..i|nit.main|
|00001c30| 2e 73 68 6f 77 07 45 6e | 64 20 53 75 62 02 0a 41 |.show.En|d Sub..A|
|00001c40| 70 70 6c 65 41 62 6f 75 | 74 02 0d 02 0d 04 1a 46 |ppleAbou|t......F|
|00001c50| 75 6e 63 74 69 6f 6e 20 | 41 63 74 69 6f 6e 20 41 |unction |Action A|
|00001c60| 73 20 42 6f 6f 6c 65 61 | 6e 0e 64 69 6d 20 61 20 |s Boolea|n.dim a |
|00001c70| 61 73 20 61 62 6f 75 74 | 0d 61 20 3d 20 6e 65 77 |as about|.a = new|
|00001c80| 20 61 62 6f 75 74 0c 45 | 6e 64 20 46 75 6e 63 74 | about.E|nd Funct|
|00001c90| 69 6f 6e 08 46 69 6c 65 | 51 75 69 74 01 04 01 04 |ion.File|Quit....|
|00001ca0| 03 1a 46 75 6e 63 74 69 | 6f 6e 20 41 63 74 69 6f |..Functi|on Actio|
|00001cb0| 6e 20 41 73 20 42 6f 6f | 6c 65 61 6e 04 71 75 69 |n As Boo|lean.qui|
|00001cc0| 74 0c 45 6e 64 20 46 75 | 6e 63 74 69 6f 6e 00 07 |t.End Fu|nction..|
|00001cd0| 07 00 00 a4 01 04 4f 76 | 61 6c 00 00 00 00 06 0a |......Ov|al......|
|00001ce0| 44 72 6f 70 4f 62 6a 65 | 63 74 01 00 01 00 03 31 |DropObje|ct.....1|
|00001cf0| 53 75 62 20 44 72 6f 70 | 4f 62 6a 65 63 74 28 49 |Sub Drop|Object(I|
|00001d00| 6e 64 65 78 20 41 73 20 | 49 6e 74 65 67 65 72 2c |ndex As |Integer,|
|00001d10| 20 6f 62 6a 20 41 73 20 | 44 72 61 67 49 74 65 6d | obj As |DragItem|
|00001d20| 29 00 07 45 6e 64 20 53 | 75 62 05 43 6c 6f 73 65 |)..End S|ub.Close|
|00001d30| 01 00 01 00 03 1b 53 75 | 62 20 43 6c 6f 73 65 28 |......Su|b Close(|
|00001d40| 49 6e 64 65 78 20 41 73 | 20 49 6e 74 65 67 65 72 |Index As| Integer|
|00001d50| 29 00 07 45 6e 64 20 53 | 75 62 09 4d 6f 75 73 65 |)..End S|ub.Mouse|
|00001d60| 45 78 69 74 01 00 01 00 | 03 1f 53 75 62 20 4d 6f |Exit....|..Sub Mo|
|00001d70| 75 73 65 45 78 69 74 28 | 49 6e 64 65 78 20 41 73 |useExit(|Index As|
|00001d80| 20 49 6e 74 65 67 65 72 | 29 00 07 45 6e 64 20 53 | Integer|)..End S|
|00001d90| 75 62 0a 4d 6f 75 73 65 | 45 6e 74 65 72 01 00 01 |ub.Mouse|Enter...|
|00001da0| 00 03 20 53 75 62 20 4d | 6f 75 73 65 45 6e 74 65 |.. Sub M|ouseEnte|
|00001db0| 72 28 49 6e 64 65 78 20 | 41 73 20 49 6e 74 65 67 |r(Index |As Integ|
|00001dc0| 65 72 29 00 07 45 6e 64 | 20 53 75 62 04 4f 70 65 |er)..End| Sub.Ope|
|00001dd0| 6e 01 00 01 00 03 1a 53 | 75 62 20 4f 70 65 6e 28 |n......S|ub Open(|
|00001de0| 49 6e 64 65 78 20 41 73 | 20 49 6e 74 65 67 65 72 |Index As| Integer|
|00001df0| 29 00 07 45 6e 64 20 53 | 75 62 09 4d 6f 75 73 65 |)..End S|ub.Mouse|
|00001e00| 4d 6f 76 65 01 00 01 00 | 03 3b 53 75 62 20 4d 6f |Move....|.;Sub Mo|
|00001e10| 75 73 65 4d 6f 76 65 28 | 49 6e 64 65 78 20 41 73 |useMove(|Index As|
|00001e20| 20 49 6e 74 65 67 65 72 | 2c 20 58 20 41 73 20 49 | Integer|, X As I|
|00001e30| 6e 74 65 67 65 72 2c 20 | 59 20 41 73 20 49 6e 74 |nteger, |Y As Int|
|00001e40| 65 67 65 72 29 00 07 45 | 6e 64 20 53 75 62 00 00 |eger)..E|nd Sub..|
|00001e50| 07 00 00 a8 01 09 52 65 | 63 74 61 6e 67 6c 65 00 |......Re|ctangle.|
|00001e60| 00 00 00 01 09 4d 6f 75 | 73 65 4d 6f 76 65 01 00 |.....Mou|seMove..|
|00001e70| 01 00 03 3b 53 75 62 20 | 4d 6f 75 73 65 4d 6f 76 |...;Sub |MouseMov|
|00001e80| 65 28 49 6e 64 65 78 20 | 41 73 20 49 6e 74 65 67 |e(Index |As Integ|
|00001e90| 65 72 2c 20 58 20 41 73 | 20 49 6e 74 65 67 65 72 |er, X As| Integer|
|00001ea0| 2c 20 59 20 41 73 20 49 | 6e 74 65 67 65 72 29 00 |, Y As I|nteger).|
|00001eb0| 07 45 6e 64 20 53 75 62 | 00 00 07 00 00 a4 01 0a |.End Sub|........|
|00001ec0| 4e 6f 74 65 50 6c 61 79 | 65 72 00 00 00 00 01 04 |NotePlay|er......|
|00001ed0| 4f 70 65 6e 01 00 01 00 | 03 0a 53 75 62 20 4f 70 |Open....|..Sub Op|
|00001ee0| 65 6e 28 29 00 07 45 6e | 64 20 53 75 62 00 00 07 |en()..En|d Sub...|
|00001ef0| 00 00 b4 01 0a 50 75 73 | 68 42 75 74 74 6f 6e 00 |.....Pus|hButton.|
|00001f00| 00 00 00 04 09 4d 6f 75 | 73 65 45 78 69 74 01 00 |.....Mou|seExit..|
|00001f10| 01 00 03 0f 53 75 62 20 | 4d 6f 75 73 65 45 78 69 |....Sub |MouseExi|
|00001f20| 74 28 29 00 07 45 6e 64 | 20 53 75 62 0a 4d 6f 75 |t()..End| Sub.Mou|
|00001f30| 73 65 45 6e 74 65 72 01 | 00 01 00 03 10 53 75 62 |seEnter.|.....Sub|
|00001f40| 20 4d 6f 75 73 65 45 6e | 74 65 72 28 29 00 07 45 | MouseEn|ter()..E|
|00001f50| 6e 64 20 53 75 62 09 4d | 6f 75 73 65 4d 6f 76 65 |nd Sub.M|ouseMove|
|00001f60| 01 00 01 00 03 29 53 75 | 62 20 4d 6f 75 73 65 4d |.....)Su|b MouseM|
|00001f70| 6f 76 65 28 58 20 41 73 | 20 49 6e 74 65 67 65 72 |ove(X As| Integer|
|00001f80| 2c 20 59 20 41 73 20 49 | 6e 74 65 67 65 72 29 00 |, Y As I|nteger).|
|00001f90| 07 45 6e 64 20 53 75 62 | 06 41 63 74 69 6f 6e 01 |.End Sub|.Action.|
|00001fa0| 1c 01 1c 04 0c 53 75 62 | 20 41 63 74 69 6f 6e 28 |.....Sub| Action(|
|00001fb0| 29 23 2f 2f 20 55 73 65 | 72 20 68 61 73 20 64 65 |)#// Use|r has de|
|00001fc0| 70 72 65 73 73 65 64 20 | 27 51 75 69 74 27 20 62 |pressed |'Quit' b|
|00001fd0| 75 74 74 6f 6e 04 71 75 | 69 74 07 45 6e 64 20 53 |utton.qu|it.End S|
|00001fe0| 75 62 00 00 07 00 00 b4 | 01 0a 53 74 61 74 69 63 |ub......|..Static|
|00001ff0| 54 65 78 74 00 00 00 00 | 01 09 4d 6f 75 73 65 4d |Text....|..MouseM|
|00002000| 6f 76 65 01 00 01 00 03 | 29 53 75 62 20 4d 6f 75 |ove.....|)Sub Mou|
|00002010| 73 65 4d 6f 76 65 28 58 | 20 41 73 20 49 6e 74 65 |seMove(X| As Inte|
|00002020| 67 65 72 2c 20 59 20 41 | 73 20 49 6e 74 65 67 65 |ger, Y A|s Intege|
|00002030| 72 29 00 07 45 6e 64 20 | 53 75 62 00 00 07 00 00 |r)..End |Sub.....|
|00002040| b4 01 0a 50 75 73 68 42 | 75 74 74 6f 6e 00 00 00 |...PushB|utton...|
|00002050| 00 01 06 41 63 74 69 6f | 6e 01 20 01 20 04 0c 53 |...Actio|n. . ..S|
|00002060| 75 62 20 41 63 74 69 6f | 6e 28 29 27 2f 2f 20 55 |ub Actio|n()'// U|
|00002070| 73 65 72 20 68 61 73 20 | 64 65 70 72 65 73 73 65 |ser has |depresse|
|00002080| 64 20 27 4e 65 77 20 47 | 61 6d 65 27 20 62 75 74 |d 'New G|ame' but|
|00002090| 74 6f 6e 05 73 74 61 72 | 74 07 45 6e 64 20 53 75 |ton.star|t.End Su|
|000020a0| 62 00 00 07 00 00 a0 01 | 0b 50 72 6f 67 72 65 73 |b.......|.Progres|
|000020b0| 73 42 61 72 00 00 00 00 | 01 09 4d 6f 75 73 65 4d |sBar....|..MouseM|
|000020c0| 6f 76 65 01 00 01 00 03 | 29 53 75 62 20 4d 6f 75 |ove.....|)Sub Mou|
|000020d0| 73 65 4d 6f 76 65 28 58 | 20 41 73 20 49 6e 74 65 |seMove(X| As Inte|
|000020e0| 67 65 72 2c 20 59 20 41 | 73 20 49 6e 74 65 67 65 |ger, Y A|s Intege|
|000020f0| 72 29 00 07 45 6e 64 20 | 53 75 62 00 00 07 09 52 |r)..End |Sub....R|
|00002100| 65 63 74 61 6e 67 6c 65 | 12 04 4e 61 6d 65 0a 52 |ectangle|..Name.R|
|00002110| 65 63 74 61 6e 67 6c 65 | 31 05 49 6e 64 65 78 01 |ectangle|1.Index.|
|00002120| 32 0d 54 61 62 50 61 6e | 65 6c 49 6e 64 65 78 01 |2.TabPan|elIndex.|
|00002130| 30 07 56 69 73 69 62 6c | 65 04 54 72 75 65 04 4c |0.Visibl|e.True.L|
|00002140| 65 66 74 02 32 35 03 54 | 6f 70 02 32 30 05 57 69 |eft.25.T|op.20.Wi|
|00002150| 64 74 68 03 32 37 30 06 | 48 65 69 67 68 74 03 32 |dth.270.|Height.2|
|00002160| 37 30 0b 42 61 6c 6c 6f | 6f 6e 48 65 6c 70 00 13 |70.Ballo|onHelp..|
|00002170| 44 69 73 61 62 6c 65 64 | 42 61 6c 6c 6f 6f 6e 48 |Disabled|BalloonH|
|00002180| 65 6c 70 00 08 4c 6f 63 | 6b 4c 65 66 74 05 46 61 |elp..Loc|kLeft.Fa|
|00002190| 6c 73 65 07 4c 6f 63 6b | 54 6f 70 05 46 61 6c 73 |lse.Lock|Top.Fals|
|000021a0| 65 09 4c 6f 63 6b 52 69 | 67 68 74 05 46 61 6c 73 |e.LockRi|ght.Fals|
|000021b0| 65 0a 4c 6f 63 6b 42 6f | 74 74 6f 6d 05 46 61 6c |e.LockBo|ttom.Fal|
|000021c0| 73 65 09 46 69 6c 6c 43 | 6f 6c 6f 72 08 31 32 32 |se.FillC|olor.122|
|000021d0| 33 37 34 39 38 0b 42 6f | 72 64 65 72 57 69 64 74 |37498.Bo|rderWidt|
|000021e0| 68 01 34 0c 54 6f 70 4c | 65 66 74 43 6f 6c 6f 72 |h.4.TopL|eftColor|
|000021f0| 08 31 36 30 35 33 34 39 | 32 10 42 6f 74 74 6f 6d |.1605349|2.Bottom|
|00002200| 52 69 67 68 74 43 6f 6c | 6f 72 07 39 38 36 38 39 |RightCol|or.98689|
|00002210| 35 30 01 04 4f 76 61 6c | 11 04 4e 61 6d 65 05 4f |50..Oval|..Name.O|
|00002220| 76 61 6c 31 05 49 6e 64 | 65 78 01 31 0d 54 61 62 |val1.Ind|ex.1.Tab|
|00002230| 50 61 6e 65 6c 49 6e 64 | 65 78 01 30 07 56 69 73 |PanelInd|ex.0.Vis|
|00002240| 69 62 6c 65 04 54 72 75 | 65 04 4c 65 66 74 03 31 |ible.Tru|e.Left.1|
|00002250| 33 35 03 54 6f 70 02 33 | 30 05 57 69 64 74 68 02 |35.Top.3|0.Width.|
|00002260| 35 30 06 48 65 69 67 68 | 74 02 35 30 0b 42 61 6c |50.Heigh|t.50.Bal|
|00002270| 6c 6f 6f 6e 48 65 6c 70 | 00 13 44 69 73 61 62 6c |loonHelp|..Disabl|
|00002280| 65 64 42 61 6c 6c 6f 6f | 6e 48 65 6c 70 00 08 4c |edBalloo|nHelp..L|
|00002290| 6f 63 6b 4c 65 66 74 05 | 46 61 6c 73 65 07 4c 6f |ockLeft.|False.Lo|
|000022a0| 63 6b 54 6f 70 05 46 61 | 6c 73 65 09 4c 6f 63 6b |ckTop.Fa|lse.Lock|
|000022b0| 52 69 67 68 74 05 46 61 | 6c 73 65 0a 4c 6f 63 6b |Right.Fa|lse.Lock|
|000022c0| 42 6f 74 74 6f 6d 05 46 | 61 6c 73 65 09 46 69 6c |Bottom.F|alse.Fil|
|000022d0| 6c 43 6f 6c 6f 72 03 32 | 35 35 0b 42 6f 72 64 65 |lColor.2|55.Borde|
|000022e0| 72 57 69 64 74 68 01 33 | 0b 42 6f 72 64 65 72 43 |rWidth.3|.BorderC|
|000022f0| 6f 6c 6f 72 07 38 33 35 | 35 37 31 31 00 0a 4e 6f |olor.835|5711..No|
|00002300| 74 65 50 6c 61 79 65 72 | 05 04 4e 61 6d 65 04 6e |tePlayer|..Name.n|
|00002310| 6f 74 65 05 49 6e 64 65 | 78 0b 2d 32 31 34 37 34 |ote.Inde|x.-21474|
|00002320| 38 33 36 34 38 04 4c 65 | 66 74 02 33 30 03 54 6f |83648.Le|ft.30.To|
|00002330| 70 03 32 35 38 0a 49 6e | 73 74 72 75 6d 65 6e 74 |p.258.In|strument|
|00002340| 02 37 34 02 0a 50 75 73 | 68 42 75 74 74 6f 6e 17 |.74..Pus|hButton.|
|00002350| 04 4e 61 6d 65 03 62 79 | 65 05 49 6e 64 65 78 0b |.Name.by|e.Index.|
|00002360| 2d 32 31 34 37 34 38 33 | 36 34 38 0d 54 61 62 50 |-2147483|648.TabP|
|00002370| 61 6e 65 6c 49 6e 64 65 | 78 01 30 07 56 69 73 69 |anelInde|x.0.Visi|
|00002380| 62 6c 65 04 54 72 75 65 | 04 4c 65 66 74 03 32 31 |ble.True|.Left.21|
|00002390| 38 03 54 6f 70 03 33 30 | 30 05 57 69 64 74 68 02 |8.Top.30|0.Width.|
|000023a0| 37 37 06 48 65 69 67 68 | 74 02 32 30 0b 42 61 6c |77.Heigh|t.20.Bal|
|000023b0| 6c 6f 6f 6e 48 65 6c 70 | 00 13 44 69 73 61 62 6c |loonHelp|..Disabl|
|000023c0| 65 64 42 61 6c 6c 6f 6f | 6e 48 65 6c 70 00 08 4c |edBalloo|nHelp..L|
|000023d0| 6f 63 6b 4c 65 66 74 05 | 46 61 6c 73 65 07 4c 6f |ockLeft.|False.Lo|
|000023e0| 63 6b 54 6f 70 05 46 61 | 6c 73 65 09 4c 6f 63 6b |ckTop.Fa|lse.Lock|
|000023f0| 52 69 67 68 74 05 46 61 | 6c 73 65 0a 4c 6f 63 6b |Right.Fa|lse.Lock|
|00002400| 42 6f 74 74 6f 6d 05 46 | 61 6c 73 65 08 54 65 78 |Bottom.F|alse.Tex|
|00002410| 74 46 6f 6e 74 08 43 68 | 61 72 63 6f 61 6c 08 54 |tFont.Ch|arcoal.T|
|00002420| 65 78 74 53 69 7a 65 02 | 31 32 04 42 6f 6c 64 05 |extSize.|12.Bold.|
|00002430| 46 61 6c 73 65 06 49 74 | 61 6c 69 63 05 46 61 6c |False.It|alic.Fal|
|00002440| 73 65 09 55 6e 64 65 72 | 6c 69 6e 65 05 46 61 6c |se.Under|line.Fal|
|00002450| 73 65 07 43 61 70 74 69 | 6f 6e 04 51 75 69 74 07 |se.Capti|on.Quit.|
|00002460| 44 65 66 61 75 6c 74 05 | 46 61 6c 73 65 06 43 61 |Default.|False.Ca|
|00002470| 6e 63 65 6c 05 46 61 6c | 73 65 07 45 6e 61 62 6c |ncel.Fal|se.Enabl|
|00002480| 65 64 04 54 72 75 65 03 | 0a 53 74 61 74 69 63 54 |ed.True.|.StaticT|
|00002490| 65 78 74 17 04 4e 61 6d | 65 08 61 66 66 73 63 6f |ext..Nam|e.affsco|
|000024a0| 72 65 05 49 6e 64 65 78 | 0b 2d 32 31 34 37 34 38 |re.Index|.-214748|
|000024b0| 33 36 34 38 0d 54 61 62 | 50 61 6e 65 6c 49 6e 64 |3648.Tab|PanelInd|
|000024c0| 65 78 01 30 07 56 69 73 | 69 62 6c 65 04 54 72 75 |ex.0.Vis|ible.Tru|
|000024d0| 65 04 4c 65 66 74 03 31 | 33 35 03 54 6f 70 03 31 |e.Left.1|35.Top.1|
|000024e0| 34 30 05 57 69 64 74 68 | 02 35 30 06 48 65 69 67 |40.Width|.50.Heig|
|000024f0| 68 74 02 32 30 0b 42 61 | 6c 6c 6f 6f 6e 48 65 6c |ht.20.Ba|lloonHel|
|00002500| 70 00 13 44 69 73 61 62 | 6c 65 64 42 61 6c 6c 6f |p..Disab|ledBallo|
|00002510| 6f 6e 48 65 6c 70 00 08 | 4c 6f 63 6b 4c 65 66 74 |onHelp..|LockLeft|
|00002520| 05 46 61 6c 73 65 07 4c | 6f 63 6b 54 6f 70 05 46 |.False.L|ockTop.F|
|00002530| 61 6c 73 65 09 4c 6f 63 | 6b 52 69 67 68 74 05 46 |alse.Loc|kRight.F|
|00002540| 61 6c 73 65 0a 4c 6f 63 | 6b 42 6f 74 74 6f 6d 05 |alse.Loc|kBottom.|
|00002550| 46 61 6c 73 65 08 54 65 | 78 74 46 6f 6e 74 08 43 |False.Te|xtFont.C|
|00002560| 68 61 72 63 6f 61 6c 08 | 54 65 78 74 53 69 7a 65 |harcoal.|TextSize|
|00002570| 02 31 36 04 42 6f 6c 64 | 05 46 61 6c 73 65 06 49 |.16.Bold|.False.I|
|00002580| 74 61 6c 69 63 05 46 61 | 6c 73 65 09 55 6e 64 65 |talic.Fa|lse.Unde|
|00002590| 72 6c 69 6e 65 05 46 61 | 6c 73 65 04 54 65 78 74 |rline.Fa|lse.Text|
|000025a0| 01 30 09 54 65 78 74 41 | 6c 69 67 6e 01 31 09 54 |.0.TextA|lign.1.T|
|000025b0| 65 78 74 43 6f 6c 6f 72 | 08 31 36 37 32 38 35 37 |extColor|.1672857|
|000025c0| 36 09 4d 75 6c 74 69 4c | 69 6e 65 05 46 61 6c 73 |6.MultiL|ine.Fals|
|000025d0| 65 04 0a 50 75 73 68 42 | 75 74 74 6f 6e 17 04 4e |e..PushB|utton..N|
|000025e0| 61 6d 65 02 6e 70 05 49 | 6e 64 65 78 0b 2d 32 31 |ame.np.I|ndex.-21|
|000025f0| 34 37 34 38 33 36 34 38 | 0d 54 61 62 50 61 6e 65 |47483648|.TabPane|
|00002600| 6c 49 6e 64 65 78 01 30 | 07 56 69 73 69 62 6c 65 |lIndex.0|.Visible|
|00002610| 04 54 72 75 65 04 4c 65 | 66 74 02 33 30 03 54 6f |.True.Le|ft.30.To|
|00002620| 70 03 33 30 30 05 57 69 | 64 74 68 03 31 36 36 06 |p.300.Wi|dth.166.|
|00002630| 48 65 69 67 68 74 02 32 | 30 0b 42 61 6c 6c 6f 6f |Height.2|0.Balloo|
|00002640| 6e 48 65 6c 70 00 13 44 | 69 73 61 62 6c 65 64 42 |nHelp..D|isabledB|
|00002650| 61 6c 6c 6f 6f 6e 48 65 | 6c 70 00 08 4c 6f 63 6b |alloonHe|lp..Lock|
|00002660| 4c 65 66 74 05 46 61 6c | 73 65 07 4c 6f 63 6b 54 |Left.Fal|se.LockT|
|00002670| 6f 70 05 46 61 6c 73 65 | 09 4c 6f 63 6b 52 69 67 |op.False|.LockRig|
|00002680| 68 74 05 46 61 6c 73 65 | 0a 4c 6f 63 6b 42 6f 74 |ht.False|.LockBot|
|00002690| 74 6f 6d 05 46 61 6c 73 | 65 08 54 65 78 74 46 6f |tom.Fals|e.TextFo|
|000026a0| 6e 74 08 43 68 61 72 63 | 6f 61 6c 08 54 65 78 74 |nt.Charc|oal.Text|
|000026b0| 53 69 7a 65 02 31 32 04 | 42 6f 6c 64 05 46 61 6c |Size.12.|Bold.Fal|
|000026c0| 73 65 06 49 74 61 6c 69 | 63 05 46 61 6c 73 65 09 |se.Itali|c.False.|
|000026d0| 55 6e 64 65 72 6c 69 6e | 65 05 46 61 6c 73 65 07 |Underlin|e.False.|
|000026e0| 43 61 70 74 69 6f 6e 08 | 4e 65 77 20 47 61 6d 65 |Caption.|New Game|
|000026f0| 07 44 65 66 61 75 6c 74 | 05 46 61 6c 73 65 06 43 |.Default|.False.C|
|00002700| 61 6e 63 65 6c 05 46 61 | 6c 73 65 07 45 6e 61 62 |ancel.Fa|lse.Enab|
|00002710| 6c 65 64 04 54 72 75 65 | 05 0b 50 72 6f 67 72 65 |led.True|..Progre|
|00002720| 73 73 42 61 72 10 04 4e | 61 6d 65 08 73 63 6f 72 |ssBar..N|ame.scor|
|00002730| 65 62 61 72 05 49 6e 64 | 65 78 0b 2d 32 31 34 37 |ebar.Ind|ex.-2147|
|00002740| 34 38 33 36 34 38 0d 54 | 61 62 50 61 6e 65 6c 49 |483648.T|abPanelI|
|00002750| 6e 64 65 78 01 30 07 56 | 69 73 69 62 6c 65 04 54 |ndex.0.V|isible.T|
|00002760| 72 75 65 04 4c 65 66 74 | 03 31 31 30 03 54 6f 70 |rue.Left|.110.Top|
|00002770| 03 31 36 34 05 57 69 64 | 74 68 03 31 30 30 06 48 |.164.Wid|th.100.H|
|00002780| 65 69 67 68 74 02 31 32 | 0b 42 61 6c 6c 6f 6f 6e |eight.12|.Balloon|
|00002790| 48 65 6c 70 00 13 44 69 | 73 61 62 6c 65 64 42 61 |Help..Di|sabledBa|
|000027a0| 6c 6c 6f 6f 6e 48 65 6c | 70 00 08 4c 6f 63 6b 4c |lloonHel|p..LockL|
|000027b0| 65 66 74 05 46 61 6c 73 | 65 07 4c 6f 63 6b 54 6f |eft.Fals|e.LockTo|
|000027c0| 70 05 46 61 6c 73 65 09 | 4c 6f 63 6b 52 69 67 68 |p.False.|LockRigh|
|000027d0| 74 05 46 61 6c 73 65 0a | 4c 6f 63 6b 42 6f 74 74 |t.False.|LockBott|
|000027e0| 6f 6d 05 46 61 6c 73 65 | 05 56 61 6c 75 65 01 30 |om.False|.Value.0|
|000027f0| 07 4d 61 78 69 6d 75 6d | 02 31 39 06 00 02 41 04 |.Maximum|.19...A.|
|00002800| 4d 65 6e 75 04 4d 65 6e | 75 05 a4 01 a4 01 90 06 |Menu.Men|u.......|
|00002810| ac 04 04 01 00 00 80 80 | 80 80 10 00 00 00 00 00 |........|........|
|00002820| 07 00 00 88 01 08 4d 65 | 6e 75 49 74 65 6d 00 00 |......Me|nuItem..|
|00002830| 00 00 00 00 00 02 00 0f | 41 62 6f 75 74 20 53 69 |........|About Si|
|00002840| 6d 6f 6e 20 2e 2e 2e 0a | 41 70 70 6c 65 41 62 6f |mon ....|AppleAbo|
|00002850| 75 74 80 80 80 80 10 00 | 00 00 00 00 07 00 00 88 |ut......|........|
|00002860| 01 08 4d 65 6e 75 49 74 | 65 6d 00 00 00 00 00 00 |..MenuIt|em......|
|00002870| 00 00 02 00 00 80 80 80 | 80 10 00 00 00 00 00 07 |........|........|
|00002880| 00 00 88 01 08 4d 65 6e | 75 49 74 65 6d 00 00 00 |.....Men|uItem...|
|00002890| 00 00 00 00 00 00 04 46 | 69 6c 65 00 80 80 80 80 |.......F|ile.....|
|000028a0| 10 00 00 00 00 00 07 00 | 00 88 01 08 4d 65 6e 75 |........|....Menu|
|000028b0| 49 74 65 6d 00 00 00 00 | 00 00 00 02 00 04 51 75 |Item....|......Qu|
|000028c0| 69 74 08 46 69 6c 65 51 | 75 69 74 80 80 80 80 10 |it.FileQ|uit.....|
|000028d0| 01 51 00 00 00 00 07 00 | 00 88 01 0c 51 75 69 74 |.Q......|....Quit|
|000028e0| 4d 65 6e 75 49 74 65 6d | 00 00 00 00 00 00 00 00 |MenuItem|........|
|000028f0| 02 00 00 80 80 80 80 10 | 00 00 00 00 00 07 00 00 |........|........|
|00002900| 88 01 08 4d 65 6e 75 49 | 74 65 6d 00 00 00 00 00 |...MenuI|tem.....|
|00002910| 00 00 00 00 04 45 64 69 | 74 00 80 80 80 80 10 00 |.....Edi|t.......|
|00002920| 00 00 00 00 07 00 00 88 | 01 08 4d 65 6e 75 49 74 |........|..MenuIt|
|00002930| 65 6d 00 00 00 00 00 00 | 00 07 00 04 55 6e 64 6f |em......|....Undo|
|00002940| 08 45 64 69 74 55 6e 64 | 6f 80 80 80 80 10 01 5a |.EditUnd|o......Z|
|00002950| 00 00 00 00 07 00 00 88 | 01 08 4d 65 6e 75 49 74 |........|..MenuIt|
|00002960| 65 6d 00 00 00 00 00 00 | 00 00 00 01 2d 00 80 80 |em......|....-...|
|00002970| 80 80 10 00 00 00 00 00 | 07 00 00 88 01 08 4d 65 |........|......Me|
|00002980| 6e 75 49 74 65 6d 00 00 | 00 00 00 00 00 00 00 03 |nuItem..|........|
|00002990| 43 75 74 07 45 64 69 74 | 43 75 74 80 80 80 80 10 |Cut.Edit|Cut.....|
|000029a0| 01 58 00 00 00 00 07 00 | 00 88 01 08 4d 65 6e 75 |.X......|....Menu|
|000029b0| 49 74 65 6d 00 00 00 00 | 00 00 00 00 00 04 43 6f |Item....|......Co|
|000029c0| 70 79 08 45 64 69 74 43 | 6f 70 79 80 80 80 80 10 |py.EditC|opy.....|
|000029d0| 01 43 00 00 00 00 07 00 | 00 88 01 08 4d 65 6e 75 |.C......|....Menu|
|000029e0| 49 74 65 6d 00 00 00 00 | 00 00 00 00 00 05 50 61 |Item....|......Pa|
|000029f0| 73 74 65 09 45 64 69 74 | 50 61 73 74 65 80 80 80 |ste.Edit|Paste...|
|00002a00| 80 10 01 56 00 00 00 00 | 07 00 00 88 01 08 4d 65 |...V....|......Me|
|00002a10| 6e 75 49 74 65 6d 00 00 | 00 00 00 00 00 00 00 05 |nuItem..|........|
|00002a20| 43 6c 65 61 72 09 45 64 | 69 74 43 6c 65 61 72 80 |Clear.Ed|itClear.|
|00002a30| 80 80 80 10 00 00 00 00 | 00 07 00 00 88 01 08 4d |........|.......M|
|00002a40| 65 6e 75 49 74 65 6d 00 | 00 00 00 00 00 00 00 02 |enuItem.|........|
|00002a50| 00 00 80 80 80 80 10 00 | 00 00 00 00 07 00 00 88 |........|........|
|00002a60| 01 08 4d 65 6e 75 49 74 | 65 6d 00 00 00 00 00 00 |..MenuIt|em......|
|00002a70| 00 00 02 00 00 80 80 80 | 80 10 00 00 00 00 00 07 |........|........|
|00002a80| 00 00 88 01 08 4d 65 6e | 75 49 74 65 6d 00 00 00 |.....Men|uItem...|
|00002a90| 00 00 00 00 00 04 41 07 | 50 69 63 74 75 72 65 03 |......A.|Picture.|
|00002aa0| 6d 6f 69 03 20 20 00 07 | 55 6e 6b 6e 6f 77 6e 30 |moi. ..|Unknown0|
|00002ab0| 52 45 41 4c 62 61 73 69 | 63 20 43 44 3a 45 78 61 |REALbasi|c CD:Exa|
|00002ac0| 6d 70 6c 65 73 3a 41 70 | 70 6c 69 63 61 74 69 6f |mples:Ap|plicatio|
|00002ad0| 6e 73 3a 53 69 6d 6f 6e | 20 31 2e 30 3a 6d 6f 69 |ns:Simon| 1.0:moi|
|00002ae0| 03 6d 6f 69 0b 41 05 53 | 6f 75 6e 64 04 69 61 72 |.moi.A.S|ound.iar|
|00002af0| 6b 07 31 52 45 41 4c 62 | 61 73 69 63 20 43 44 3a |k.1REALb|asic CD:|
|00002b00| 45 78 61 6d 70 6c 65 73 | 3a 41 70 70 6c 69 63 61 |Examples|:Applica|
|00002b10| 74 69 6f 6e 73 3a 53 69 | 6d 6f 6e 20 31 2e 30 3a |tions:Si|mon 1.0:|
|00002b20| 69 61 72 6b 04 69 61 72 | 6b 0c 41 05 53 6f 75 6e |iark.iar|k.A.Soun|
|00002b30| 64 05 6f 75 61 69 73 07 | 32 52 45 41 4c 62 61 73 |d.ouais.|2REALbas|
|00002b40| 69 63 20 43 44 3a 45 78 | 61 6d 70 6c 65 73 3a 41 |ic CD:Ex|amples:A|
|00002b50| 70 70 6c 69 63 61 74 69 | 6f 6e 73 3a 53 69 6d 6f |pplicati|ons:Simo|
|00002b60| 6e 20 31 2e 30 3a 6f 75 | 61 69 73 05 6f 75 61 69 |n 1.0:ou|ais.ouai|
|00002b70| 73 0e 41 05 53 6f 75 6e | 64 03 66 69 6e 07 30 52 |s.A.Soun|d.fin.0R|
|00002b80| 45 41 4c 62 61 73 69 63 | 20 43 44 3a 45 78 61 6d |EALbasic| CD:Exam|
|00002b90| 70 6c 65 73 3a 41 70 70 | 6c 69 63 61 74 69 6f 6e |ples:App|lication|
|00002ba0| 73 3a 53 69 6d 6f 6e 20 | 31 2e 30 3a 66 69 6e 03 |s:Simon |1.0:fin.|
|00002bb0| 66 69 6e 10 41 04 56 69 | 65 77 05 41 62 6f 75 74 |fin.A.Vi|ew.About|
|00002bc0| 04 a4 01 a4 01 12 04 4e | 61 6d 65 05 41 62 6f 75 |.......N|ame.Abou|
|00002bd0| 74 05 46 72 61 6d 65 01 | 32 0c 48 61 73 42 61 63 |t.Frame.|2.HasBac|
|00002be0| 6b 43 6f 6c 6f 72 04 54 | 72 75 65 09 42 61 63 6b |kColor.T|rue.Back|
|00002bf0| 43 6f 6c 6f 72 08 31 32 | 30 35 38 36 31 32 08 42 |Color.12|058612.B|
|00002c00| 61 63 6b 64 72 6f 70 01 | 30 05 54 69 74 6c 65 0f |ackdrop.|0.Title.|
|00002c10| 41 62 6f 75 74 20 53 69 | 6d 6f 6e 20 2e 2e 2e 07 |About Si|mon ....|
|00002c20| 56 69 73 69 62 6c 65 04 | 54 72 75 65 08 43 6c 6f |Visible.|True.Clo|
|00002c30| 73 65 42 6f 78 04 54 72 | 75 65 08 47 72 6f 77 49 |seBox.Tr|ue.GrowI|
|00002c40| 63 6f 6e 04 54 72 75 65 | 08 5a 6f 6f 6d 49 63 6f |con.True|.ZoomIco|
|00002c50| 6e 04 54 72 75 65 0b 42 | 61 6c 6c 6f 6f 6e 48 65 |n.True.B|alloonHe|
|00002c60| 6c 70 00 09 50 6c 61 63 | 65 6d 65 6e 74 01 30 05 |lp..Plac|ement.0.|
|00002c70| 57 69 64 74 68 03 32 39 | 30 06 48 65 69 67 68 74 |Width.29|0.Height|
|00002c80| 02 39 36 08 4d 69 6e 57 | 69 64 74 68 02 36 34 09 |.96.MinW|idth.64.|
|00002c90| 4d 69 6e 48 65 69 67 68 | 74 02 36 34 08 4d 61 78 |MinHeigh|t.64.Max|
|00002ca0| 57 69 64 74 68 05 33 32 | 30 30 30 09 4d 61 78 48 |Width.32|000.MaxH|
|00002cb0| 65 69 67 68 74 05 33 32 | 30 30 30 07 00 05 41 62 |eight.32|000...Ab|
|00002cc0| 6f 75 74 ac 01 06 44 69 | 61 6c 6f 67 00 00 00 00 |out...Di|alog....|
|00002cd0| 03 09 4d 6f 75 73 65 44 | 6f 77 6e 01 05 01 05 03 |..MouseD|own.....|
|00002ce0| 39 46 75 6e 63 74 69 6f | 6e 20 4d 6f 75 73 65 44 |9Functio|n MouseD|
|00002cf0| 6f 77 6e 28 58 20 41 73 | 20 49 6e 74 65 67 65 72 |own(X As| Integer|
|00002d00| 2c 20 59 20 41 73 20 49 | 6e 74 65 67 65 72 29 20 |, Y As I|nteger) |
|00002d10| 41 73 20 42 6f 6f 6c 65 | 61 6e 05 43 6c 6f 73 65 |As Boole|an.Close|
|00002d20| 0c 45 6e 64 20 46 75 6e | 63 74 69 6f 6e 07 4b 65 |.End Fun|ction.Ke|
|00002d30| 79 44 6f 77 6e 01 05 01 | 05 03 2a 46 75 6e 63 74 |yDown...|..*Funct|
|00002d40| 69 6f 6e 20 4b 65 79 44 | 6f 77 6e 28 4b 65 79 20 |ion KeyD|own(Key |
|00002d50| 41 73 20 53 74 72 69 6e | 67 29 20 41 73 20 42 6f |As Strin|g) As Bo|
|00002d60| 6f 6c 65 61 6e 05 43 6c | 6f 73 65 0c 45 6e 64 20 |olean.Cl|ose.End |
|00002d70| 46 75 6e 63 74 69 6f 6e | 04 4f 70 65 6e 01 00 01 |Function|.Open...|
|00002d80| 00 03 0a 53 75 62 20 4f | 70 65 6e 28 29 00 07 45 |...Sub O|pen()..E|
|00002d90| 6e 64 20 53 75 62 00 00 | 03 07 00 00 a4 01 06 43 |nd Sub..|.......C|
|00002da0| 61 6e 76 61 73 00 00 00 | 00 01 05 50 61 69 6e 74 |anvas...|...Paint|
|00002db0| 01 00 01 00 03 18 53 75 | 62 20 50 61 69 6e 74 28 |......Su|b Paint(|
|00002dc0| 67 20 41 73 20 47 72 61 | 70 68 69 63 73 29 00 07 |g As Gra|phics)..|
|00002dd0| 45 6e 64 20 53 75 62 00 | 00 07 00 00 b4 01 0a 53 |End Sub.|.......S|
|00002de0| 74 61 74 69 63 54 65 78 | 74 00 00 00 00 01 09 4d |taticTex|t......M|
|00002df0| 6f 75 73 65 4d 6f 76 65 | 01 00 01 00 03 29 53 75 |ouseMove|.....)Su|
|00002e00| 62 20 4d 6f 75 73 65 4d | 6f 76 65 28 58 20 41 73 |b MouseM|ove(X As|
|00002e10| 20 49 6e 74 65 67 65 72 | 2c 20 59 20 41 73 20 49 | Integer|, Y As I|
|00002e20| 6e 74 65 67 65 72 29 00 | 07 45 6e 64 20 53 75 62 |nteger).|.End Sub|
|00002e30| 00 00 07 00 00 b4 01 0a | 53 74 61 74 69 63 54 65 |........|StaticTe|
|00002e40| 78 74 00 00 00 00 00 00 | 00 03 06 43 61 6e 76 61 |xt......|...Canva|
|00002e50| 73 10 04 4e 61 6d 65 07 | 43 61 6e 76 61 73 31 05 |s..Name.|Canvas1.|
|00002e60| 49 6e 64 65 78 0b 2d 32 | 31 34 37 34 38 33 36 34 |Index.-2|14748364|
|00002e70| 38 0d 54 61 62 50 61 6e | 65 6c 49 6e 64 65 78 01 |8.TabPan|elIndex.|
|00002e80| 30 07 56 69 73 69 62 6c | 65 04 54 72 75 65 04 4c |0.Visibl|e.True.L|
|00002e90| 65 66 74 02 37 30 03 54 | 6f 70 02 32 30 05 57 69 |eft.70.T|op.20.Wi|
|00002ea0| 64 74 68 02 33 32 06 48 | 65 69 67 68 74 02 33 32 |dth.32.H|eight.32|
|00002eb0| 0b 42 61 6c 6c 6f 6f 6e | 48 65 6c 70 00 13 44 69 |.Balloon|Help..Di|
|00002ec0| 73 61 62 6c 65 64 42 61 | 6c 6c 6f 6f 6e 48 65 6c |sabledBa|lloonHel|
|00002ed0| 70 00 08 4c 6f 63 6b 4c | 65 66 74 05 46 61 6c 73 |p..LockL|eft.Fals|
|00002ee0| 65 07 4c 6f 63 6b 54 6f | 70 05 46 61 6c 73 65 09 |e.LockTo|p.False.|
|00002ef0| 4c 6f 63 6b 52 69 67 68 | 74 05 46 61 6c 73 65 0a |LockRigh|t.False.|
|00002f00| 4c 6f 63 6b 42 6f 74 74 | 6f 6d 05 46 61 6c 73 65 |LockBott|om.False|
|00002f10| 08 42 61 63 6b 64 72 6f | 70 01 34 07 45 6e 61 62 |.Backdro|p.4.Enab|
|00002f20| 6c 65 64 04 54 72 75 65 | 00 0a 53 74 61 74 69 63 |led.True|..Static|
|00002f30| 54 65 78 74 17 04 4e 61 | 6d 65 0b 53 74 61 74 69 |Text..Na|me.Stati|
|00002f40| 63 54 65 78 74 31 05 49 | 6e 64 65 78 0b 2d 32 31 |cText1.I|ndex.-21|
|00002f50| 34 37 34 38 33 36 34 38 | 0d 54 61 62 50 61 6e 65 |47483648|.TabPane|
|00002f60| 6c 49 6e 64 65 78 01 30 | 07 56 69 73 69 62 6c 65 |lIndex.0|.Visible|
|00002f70| 04 54 72 75 65 04 4c 65 | 66 74 03 31 31 39 03 54 |.True.Le|ft.119.T|
|00002f80| 6f 70 02 32 30 05 57 69 | 64 74 68 03 31 30 37 06 |op.20.Wi|dth.107.|
|00002f90| 48 65 69 67 68 74 02 31 | 38 0b 42 61 6c 6c 6f 6f |Height.1|8.Balloo|
|00002fa0| 6e 48 65 6c 70 00 13 44 | 69 73 61 62 6c 65 64 42 |nHelp..D|isabledB|
|00002fb0| 61 6c 6c 6f 6f 6e 48 65 | 6c 70 00 08 4c 6f 63 6b |alloonHe|lp..Lock|
|00002fc0| 4c 65 66 74 05 46 61 6c | 73 65 07 4c 6f 63 6b 54 |Left.Fal|se.LockT|
|00002fd0| 6f 70 05 46 61 6c 73 65 | 09 4c 6f 63 6b 52 69 67 |op.False|.LockRig|
|00002fe0| 68 74 05 46 61 6c 73 65 | 0a 4c 6f 63 6b 42 6f 74 |ht.False|.LockBot|
|00002ff0| 74 6f 6d 05 46 61 6c 73 | 65 08 54 65 78 74 46 6f |tom.Fals|e.TextFo|
|00003000| 6e 74 08 43 68 61 72 63 | 6f 61 6c 08 54 65 78 74 |nt.Charc|oal.Text|
|00003010| 53 69 7a 65 02 32 30 04 | 42 6f 6c 64 05 46 61 6c |Size.20.|Bold.Fal|
|00003020| 73 65 06 49 74 61 6c 69 | 63 05 46 61 6c 73 65 09 |se.Itali|c.False.|
|00003030| 55 6e 64 65 72 6c 69 6e | 65 05 46 61 6c 73 65 04 |Underlin|e.False.|
|00003040| 54 65 78 74 09 53 49 4d | 4f 4e 20 31 2e 30 09 54 |Text.SIM|ON 1.0.T|
|00003050| 65 78 74 41 6c 69 67 6e | 01 30 09 54 65 78 74 43 |extAlign|.0.TextC|
|00003060| 6f 6c 6f 72 01 30 09 4d | 75 6c 74 69 4c 69 6e 65 |olor.0.M|ultiLine|
|00003070| 05 46 61 6c 73 65 01 0a | 53 74 61 74 69 63 54 65 |.False..|StaticTe|
|00003080| 78 74 17 04 4e 61 6d 65 | 0b 53 74 61 74 69 63 54 |xt..Name|.StaticT|
|00003090| 65 78 74 32 05 49 6e 64 | 65 78 0b 2d 32 31 34 37 |ext2.Ind|ex.-2147|
|000030a0| 34 38 33 36 34 38 0d 54 | 61 62 50 61 6e 65 6c 49 |483648.T|abPanelI|
|000030b0| 6e 64 65 78 01 30 07 56 | 69 73 69 62 6c 65 04 54 |ndex.0.V|isible.T|
|000030c0| 72 75 65 04 4c 65 66 74 | 03 31 31 39 03 54 6f 70 |rue.Left|.119.Top|
|000030d0| 02 33 39 05 57 69 64 74 | 68 03 31 30 37 06 48 65 |.39.Widt|h.107.He|
|000030e0| 69 67 68 74 02 31 33 0b | 42 61 6c 6c 6f 6f 6e 48 |ight.13.|BalloonH|
|000030f0| 65 6c 70 00 13 44 69 73 | 61 62 6c 65 64 42 61 6c |elp..Dis|abledBal|
|00003100| 6c 6f 6f 6e 48 65 6c 70 | 00 08 4c 6f 63 6b 4c 65 |loonHelp|..LockLe|
|00003110| 66 74 05 46 61 6c 73 65 | 07 4c 6f 63 6b 54 6f 70 |ft.False|.LockTop|
|00003120| 05 46 61 6c 73 65 09 4c | 6f 63 6b 52 69 67 68 74 |.False.L|ockRight|
|00003130| 05 46 61 6c 73 65 0a 4c | 6f 63 6b 42 6f 74 74 6f |.False.L|ockBotto|
|00003140| 6d 05 46 61 6c 73 65 08 | 54 65 78 74 46 6f 6e 74 |m.False.|TextFont|
|00003150| 08 43 68 61 72 63 6f 61 | 6c 08 54 65 78 74 53 69 |.Charcoa|l.TextSi|
|00003160| 7a 65 02 31 30 04 42 6f | 6c 64 05 46 61 6c 73 65 |ze.10.Bo|ld.False|
|00003170| 06 49 74 61 6c 69 63 05 | 46 61 6c 73 65 09 55 6e |.Italic.|False.Un|
|00003180| 64 65 72 6c 69 6e 65 05 | 46 61 6c 73 65 04 54 65 |derline.|False.Te|
|00003190| 78 74 11 43 2e 20 42 72 | 75 6e 65 6c 20 20 a9 20 |xt.C. Br|unel . |
|000031a0| 31 39 39 38 09 54 65 78 | 74 41 6c 69 67 6e 01 30 |1998.Tex|tAlign.0|
|000031b0| 09 54 65 78 74 43 6f 6c | 6f 72 01 30 09 4d 75 6c |.TextCol|or.0.Mul|
|000031c0| 74 69 4c 69 6e 65 05 46 | 61 6c 73 65 02 00 |tiLine.F|alse.. |
+--------+-------------------------+-------------------------+--------+--------+
